Olá gente.. Eu gostaria de saber o seguinte... Tipo eu tenho vários Text's e vários Combo's, bom dai conforme o que o usuário configura para fazer no formulário alguns desses controles podem ter o visble = true ou não, dai o que eu preciso fazer é verificar se TODOS os controles estão com a propriedade text <> "" entenderam ???? Tipo eu quero saber se todos os campos foram preenchidos.. Só que aqueles q tem o visible = false eu não posso verificar... A idéia é essa.. Alguém sabe como eu posso fazer isso ?????? Qualquer dúvida me digam.. Obrigado desde já..

Oks,
Rafael Portal

'Ou algo assim, mas não testei....

 

Public Sub Limpa(nomeform As Form, Optional campo_nao_limpa As String)
Dim Controle As Control
    For Each Controle In nomeform.Controls
        If Controle.Name <> campo_nao_limpa Then
            If TypeOf Controle Is TextBox Then
                If Controle.Text = Empty And Controle.Visible = True Then
                    MsgBox "campos não digitados"
           End If
      End If
    Next Controle
End Sub