Discussion :

[ThSPB]

Bonjour,
Un peu d'aide s'il vous plait.
Dans un UserForm j'ai créé un ButtonOption, une TextBox et un CommandButton. Je veux faire apparaitre un MsgBox en cliquant sur CommandButton si le ButtonOption est activé et que la TextBox est vide.
Merci de votre aide

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CommandButton1_Click()
If Me.OptionButton1 And Me.TextBox1.Text = "" Then MsgBox "toto"
End Sub

[ThSPB]

C'est le "Me" que je n'avais pas assimilé. Je vais réviser

[mercatog]

le Me c'est pas obligatoire, il désigne l'userform