Bonsoir, avec ce code, je peux sortir d'une zone de texte vide mais à chaque fois que le MSGBOX sort ou il faut appuyer sur le bouton et faire le choix Ok ou CANCEL.
Vous pouvez annuler le MSGBOX et fermer le formulaire de bouton sans définir la propriété TakeFocusOnClick sur False.
Merci.
VB:
Private Sub Textbox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox1.Tag = "" Then
TextBox1.Tag = 1
If TextBox1.Value = "" Then
If MsgBox("Das Namensfeld darf nicht leer bleiben", vbOKCancel) = 1 Then
Cancel = True
Else
Unload Me
End If
End If
TextBox1.Tag = ""
End If
End Sub
Bonsoir, avec ce code, je peux sortir d'une zone de texte vide mais à chaque fois que le MSGBOX sort ou il faut appuyer sur le bouton et faire le choix Ok ou CANCEL.
Vous pouvez annuler le MSGBOX et fermer le formulaire de bouton sans définir la propriété TakeFocusOnClick sur False.
Merci.
VB:
Private Sub Textbox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox1.Tag = "" Then
TextBox1.Tag = 1
If TextBox1.Value = "" Then
If MsgBox("Das Namensfeld darf nicht leer bleiben", vbOKCancel) = 1 Then
Cancel = True
Else
Unload Me
End If
End If
TextBox1.Tag = ""
End If
End Sub
Bonjour, mais la vérification du texte vide n'est pas là. Avec la touche Entrée, le focus passe à text2 et cela ne doit se produire que dans text1 il y a des données.
Bonjour, mais la vérification du texte vide n'est pas là. Avec la touche Entrée, le focus passe à text2 et cela ne doit se produire que dans text1 il y a des données.