Notifications
Clear all

notificar que item não foi preenchido

2 Posts
2 Usuários
0 Reactions
1,115 Visualizações
(@michelle93)
Posts: 24
Eminent Member
Topic starter
 

preciso que ao gravar, se todos os campos não estiverem preenchidos, apareça a msg para preencher.
Consegui com todos, mas quando se trata de um OptionButton onde será selecionado apenas 1 dos dois, não está funcionando

Private Sub btngravar_Click()

If Me.boxempresas.Value = "" Then
MsgBox "Preencha o campo Empresa.", vbExclamation, "Aviso"
Me.boxempresas.SetFocus
Exit Sub

ElseIf Me.btnplo.Caption & Me.btn99.Caption = False Then
MsgBox "Preencha o campo Depósito", vbExclamation, "Aviso"
Me.btnplo.SetFocus
Me.btn99.SetFocus

End If
 
Postado : 02/10/2018 10:34 am
(@mprudencio)
Posts: 2749
Famed Member
 

Experimente este!

If OptionButton1.Value = False And OptionButton2.Value = False Then
MsgBox "Selecione uma Opção!!"
Exit Sub
End If

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 02/10/2018 11:32 am