Passer à la suite après une boucle For ... Next
meyscal -
Bonjour,
j'ai un code pour un bouton qui vérifie que tous les champs d'un userform soient remplis. Ca fonctionne très bien si ce n'est que je ne trouve pas comment passer à la suite ... :(
Ce que je souhaite si tout est rempli est tout bête :
UserForm2.Hide
UserForm3.Show
Voici mon code :
Option Explicit
Private Sub CommandButton1_Click()
Dim ctrl As Control
For Each ctrl In UserForm2.Controls
If TypeName(ctrl) = "TextBox" Then
If ctrl.Text = "" Then
MsgBox "C'est de la triche, vous ne jouez pas le jeu. Tous les champs doivent être renseignés."
Exit For
End If
End If
If TypeName(ctrl) = "ComboBox" Then
If ctrl.Value = "" Then
MsgBox "C'est de la triche, vous ne jouez pas le jeu. Tous les champs doivent être renseignés."
Exit For
End If
End If
Next ctrl
End Sub
Par avance un grand merci
Windows / Chrome 111.0.0.0
- Le fichier contient un programme écrit en python. le programme construit un mot secret mais il ne l'affiche pas. modifiez ce programme afin que à chaque itération de la boucle : la variable a augmente de 2 la variable b diminue de 1 ajoutez une instruction pour faire afficher le mot secret construit. quel est ce mot secret ?
- Le fichier à télécharger comporte plusieurs calques. l’un d’eux contient un mot caché. quel est ce mot ? - Forum Téléchargement
- Trousseau mot de passe iphone - Guide
- Comment réduire la taille d'un fichier - Guide
- Mot de passe - Guide
- Un document .docx est, en réalité, composé de plusieurs fichiers. dans le fichier à télécharger, trouvez le fichier secret. quel mot contient-il ? ✓ - Forum Windows
