Boa tarde pessoal.
Copiei um código na internet como sempre, e estou tentando adaptar em outra planilha.
Numa userform, eu quero que o VBA não execute se o usuário não digitar ou selecionar na ComboBox e no TextBox
' Verifica se o mês foi digitado.
If ComboBox1 = "" Then
MsgBox "Digite o mês do fechamento !"
Exit Sub
ComboBox1.SetFocus
Else
' Verifica se o ano foi digitado.
If TextBox1 = "" Then
MsgBox "Digite o ano do fechamento !"
Exit Sub
TextBox1.SetFocus
End If
End If
No código acima, se a ComboBox estiver vazio, o correto não seria após clicar no botão para executar que apresente a mensagem "Digite o mês do fechamento !" e selecionar automaticamente a ComboBox ?
Pois no meu arquivo ainda fica selecionado o botão!
O SetFocus não serve para retornar onde ocorreu o erro ?
Obrigado!
_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.
Postado : 23/11/2015 11:46 am