Problema com(ByVal Cancel As MSForms.ReturnBoolean)[RESOLVIDO]
Enviado: Sex Set 14, 2018 11:51 pm
Olá, sou meio leigo em questões de codificação e só sei o que aprendi aqui e em outros foruns e locais da web.
criei umas pasta habilitada com alguns userforms e nelas textbox e combobox para editar a planilhas ao clicar no botão. Minha dúvida é:
Meus textbox e combobox estão separados por quadros e utilizei um comando (ByVal Cancel As MSForms.ReturnBoolean) em cada textbox e combobox para impedir que sejam esquecidos de serem preenchidos, e deu resultado, porém o ultimo textbox ou combobox do quadro não ativa o comando quando aperto enter ou tab, e vai direto para o proximo campo, como resolver isso? segue comandos:
Private Sub Combobox11_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(ComboBox11.Text) = 0 Then
MsgBox "Selecione Sim ou Não para:Mudança na rotina do Imóvel?(festa,obra mais pessoas,animais,etc):", vbCritical, "AVISO!"
Cancel = True
ComboBox11.SelStart = 0
ComboBox11.SelLength = ComboBox11.TextLength
Else
End If
End Sub
criei umas pasta habilitada com alguns userforms e nelas textbox e combobox para editar a planilhas ao clicar no botão. Minha dúvida é:
Meus textbox e combobox estão separados por quadros e utilizei um comando (ByVal Cancel As MSForms.ReturnBoolean) em cada textbox e combobox para impedir que sejam esquecidos de serem preenchidos, e deu resultado, porém o ultimo textbox ou combobox do quadro não ativa o comando quando aperto enter ou tab, e vai direto para o proximo campo, como resolver isso? segue comandos:
Private Sub Combobox11_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(ComboBox11.Text) = 0 Then
MsgBox "Selecione Sim ou Não para:Mudança na rotina do Imóvel?(festa,obra mais pessoas,animais,etc):", vbCritical, "AVISO!"
Cancel = True
ComboBox11.SelStart = 0
ComboBox11.SelLength = ComboBox11.TextLength
Else
End If
End Sub