Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
verificator
bonjour anonymous,
généralement, tester la valeur d'un CheckBox ne se fait sur l'événement "CheckBox1_Click()". C'est plutôt lors du lancement d'une action que l'on scrute la valeur d'1 ou plusieurs CheckBox. Exemple :
---------------------------------------------------- Private Sub CommandButton1_Click() If Not CheckBox1 Then MsgBox "Nous avons les moyens" & vbLf _ & " de vous faire accepter " & vbLf _ & " conditions !", vbCritical End If
End Sub ----------------------------------------------------
Quant à la propriété checked, je n'ai pas connaissance de son existence.
amicalement
-----Original Message----- Voilà, je recrée un sujet de peur de n'être jamais répondu:
J'ai donc suivi toutes les instructions donnée par anonymousA.
Cependant dans mon UserForm j'ai ajouté une checkbox
J'aimerais que si la Checkbox n'est pas cochée qu'il y ait
un message "Vous devez accepter les conditions d'utilisation" qui arrive.
Je m'y suis un peu essayé, mais ca n'a pas l'air de fonctionner ;-)
Private Sub CheckBox1_Click()
If CheckBox1 Is Not Checked Then MsgBox "Vous devez accepter les conditions d'utilisation" End Sub
Merci de m'aider .
bonjour anonymous,
généralement, tester la valeur d'un CheckBox ne se fait
sur l'événement "CheckBox1_Click()". C'est plutôt lors du
lancement d'une action que l'on scrute la valeur d'1 ou
plusieurs CheckBox. Exemple :
----------------------------------------------------
Private Sub CommandButton1_Click()
If Not CheckBox1 Then
MsgBox "Nous avons les moyens" & vbLf _
& " de vous faire accepter " & vbLf _
& " conditions !", vbCritical
End If
End Sub
----------------------------------------------------
Quant à la propriété checked, je n'ai pas connaissance de
son existence.
amicalement
-----Original Message-----
Voilà, je recrée un sujet de peur de n'être jamais
répondu:
J'ai donc suivi toutes les instructions donnée par
anonymousA.
Cependant dans mon UserForm j'ai ajouté une checkbox
J'aimerais que si la Checkbox n'est pas cochée qu'il y
ait
un message "Vous devez accepter les conditions
d'utilisation" qui arrive.
Je m'y suis un peu essayé, mais ca n'a pas l'air de
fonctionner ;-)
Private Sub CheckBox1_Click()
If CheckBox1 Is Not Checked Then
MsgBox "Vous devez accepter les conditions d'utilisation"
End Sub
généralement, tester la valeur d'un CheckBox ne se fait sur l'événement "CheckBox1_Click()". C'est plutôt lors du lancement d'une action que l'on scrute la valeur d'1 ou plusieurs CheckBox. Exemple :
---------------------------------------------------- Private Sub CommandButton1_Click() If Not CheckBox1 Then MsgBox "Nous avons les moyens" & vbLf _ & " de vous faire accepter " & vbLf _ & " conditions !", vbCritical End If
End Sub ----------------------------------------------------
Quant à la propriété checked, je n'ai pas connaissance de son existence.
amicalement
-----Original Message----- Voilà, je recrée un sujet de peur de n'être jamais répondu:
J'ai donc suivi toutes les instructions donnée par anonymousA.
Cependant dans mon UserForm j'ai ajouté une checkbox
J'aimerais que si la Checkbox n'est pas cochée qu'il y ait
un message "Vous devez accepter les conditions d'utilisation" qui arrive.
Je m'y suis un peu essayé, mais ca n'a pas l'air de fonctionner ;-)
Private Sub CheckBox1_Click()
If CheckBox1 Is Not Checked Then MsgBox "Vous devez accepter les conditions d'utilisation" End Sub
Merci de m'aider .
Patrick Fredin
Bonjour,
Je pense que c'est plutôt comme cela :
If CheckBox1.Value = False Then MsgBox "Vous devez accepter les conditions d'utilisation" End Sub
-- Patrick
wrote in message news:1dfb01c4f7ee$4797e2f0$ Voilà, je recrée un sujet de peur de n'être jamais répondu:
J'ai donc suivi toutes les instructions donnée par anonymousA.
Cependant dans mon UserForm j'ai ajouté une checkbox
J'aimerais que si la Checkbox n'est pas cochée qu'il y ait un message "Vous devez accepter les conditions d'utilisation" qui arrive.
Je m'y suis un peu essayé, mais ca n'a pas l'air de fonctionner ;-)
Private Sub CheckBox1_Click()
If CheckBox1 Is Not Checked Then MsgBox "Vous devez accepter les conditions d'utilisation" End Sub
Merci de m'aider
Bonjour,
Je pense que c'est plutôt comme cela :
If CheckBox1.Value = False Then
MsgBox "Vous devez accepter les conditions d'utilisation"
End Sub
--
Patrick
<anonymous@discussions.microsoft.com> wrote in message
news:1dfb01c4f7ee$4797e2f0$a301280a@phx.gbl...
Voilà, je recrée un sujet de peur de n'être jamais répondu:
J'ai donc suivi toutes les instructions donnée par
anonymousA.
Cependant dans mon UserForm j'ai ajouté une checkbox
J'aimerais que si la Checkbox n'est pas cochée qu'il y ait
un message "Vous devez accepter les conditions
d'utilisation" qui arrive.
Je m'y suis un peu essayé, mais ca n'a pas l'air de
fonctionner ;-)
Private Sub CheckBox1_Click()
If CheckBox1 Is Not Checked Then
MsgBox "Vous devez accepter les conditions d'utilisation"
End Sub