Notifications
Clear all

Campo obrigatório em formulário - Ajuda com erro

2 Posts
2 Usuários
0 Reactions
1,456 Visualizações
(@jessy1985)
Posts: 1
New Member
Topic starter
 

Pessoal,

O código abaixo eu coloco num formulário que montei para que o campo seja obrigatório o preenchimento, o usuário não consegue ir para outro campo sem preencher este primeiro. O problema, é se o usuário optar por fechar o formulário, fica aparecendo a mensagem de preenchimento obrigatório.

Eu gostaria que ao fechar o formulário, não recebesse essa mensagem. Lembrando que todos os campos do formulário são de preenchimento obrigatório e levarão este código.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox1 = "" Then
MsgBox "Preenchimento Obrigatório"
Cancel = True
TextBox1.SetFocus
End If
End Sub

Obs.: Não achei onde anexar o arquivo aqui no site.

 
Postado : 21/11/2019 9:42 am
Mauro Coutinho
(@coutinho)
Posts: 95
Estimable Member
 

Jessy1985, o ideal seria saber como estão dispostos os controles e Textbox em seu formulário.

Trabalhar com esses Eventos as vezes é complicado no excel, eu já passei por isso e a única maneira e mais simples que encontrei, foi criando um Frame, colocando todos os controles dentro do mesmo ficando de fora somente o Botão para Sair.
Para exemplificar melhor segue um modelinho básico, dê uma olhada e veja se consegue ajustar ao seu modelo.

Campo Obrigatorio Exit Textbox
https://www.sendspace.com/file/24w8f4

[]s
Mauro Coutinho

 
Postado : 21/11/2019 2:31 pm