msgbox no VBA

[fabriciokraus]

Bom dia 

 

Estou desenvolvendo um formulário para atualização cadastral no vba, usando o UserForm. porém tenho alguns campos que precisão ser obrigatórios, como CPF, NOME, DATA NASCIMENTO, RG entre outros. 

Queria saber como informo no msgbox os campos que ainda não foram preenchidos? 

 

  

[Patropi]

Fabricio

 

Sem anexar a planilha com o Userform e os códigos, dificilmente o pessoal vai te ajudar.

 

[]s

[Midori]

Você pode usar o comando For Each para verificar todos TextBox do formulário, por exemplo

 

dim c 	as control
dim str as string

for each c to me.controls
	if typename(c) = "TextBox" then
    	if c.text = "" then
		str = str & c.name        
        end if
    end if
next c

msgbox "Campos que não foram preenchidos = " & str