Olá galera!
Minha duvida e bem simples eu quero fazer um IF
Quando eu clico no botão
Private Sub Comando35_Click()
DoCmd.RunCommand acCmdRefresh
If Me.ENDERECOCOB.Value = "", Me.BAIRROCOB.Value = "", Me.CIDADECOB.Value = "", Me.CEPCOB.Value = "",
Me.UFCOB.Value = "" then
MsgBox "Atenção Bairro, Cidade, CEP e Estado, estão vazios, por favor preencha campos", vbCritical, "Atenção"
Else
DoCmd.OpenReport "CORREIOS_ENDERECO_IMPRESSÃO", acViewReport
End If
End Sub
Porque eu preciso que ele faça a valiação em todos os itens acima
Se endereço, bairro, cidade, CEP ou UF estiverem vazios ele dá a mensagem
Desse jeito que eu fiz acima não funciona
Teria outra forma?
Obrigado gente!
Minha duvida e bem simples eu quero fazer um IF
Quando eu clico no botão
Private Sub Comando35_Click()
DoCmd.RunCommand acCmdRefresh
If Me.ENDERECOCOB.Value = "", Me.BAIRROCOB.Value = "", Me.CIDADECOB.Value = "", Me.CEPCOB.Value = "",
Me.UFCOB.Value = "" then
MsgBox "Atenção Bairro, Cidade, CEP e Estado, estão vazios, por favor preencha campos", vbCritical, "Atenção"
Else
DoCmd.OpenReport "CORREIOS_ENDERECO_IMPRESSÃO", acViewReport
End If
End Sub
Porque eu preciso que ele faça a valiação em todos os itens acima
Se endereço, bairro, cidade, CEP ou UF estiverem vazios ele dá a mensagem
Desse jeito que eu fiz acima não funciona
Teria outra forma?
Obrigado gente!
Última edição por edersantana em 1/7/2013, 19:29, editado 1 vez(es)