Syntaxe exacte

[J-c]

Bonjour à tous

Pouvez vous me dire quelle est la syntaxe exacte de ceci, le "et" pose problème
If CheckBox2 = "" Et CheckBox2 = "" Then MsgBox ("Message à afficher")
Il faut que les deux condition soient réunis pour avoir l'affichage du message
Cdlt J-C

 

[PascalXLD]

Re : Syntaxe exacte

bonjour

on ecrit en anglais AND

 

[J-c]

Re : Syntaxe exacte

Bonjour

J'ai fait une erreur:
If CheckBox1 = "" Et CheckBox2 = "" Then MsgBox ("Message à afficher")

J'ai testé avec And, il ne tient pas compte de cette ligne

Cdlt J-C

 

[PascalXLD]

Re : Syntaxe exacte

Re

Un checkbox est true ou false mais pas ""

 

[JCGL]

Re : Syntaxe exacte

Bonjour à tous,

Enlevé après vérification ;-)

A+ à tous

 

[J-c]

Re : Syntaxe exacte

Bonsoir

Oui biensur Merci !!!
Cdlt J-C

 

[vbacrumble]

Re : Syntaxe exacte

Bonsoir tous


Histoire de participer (et comme je viens de tester, je livre la chose)

Private Sub CommandButton1_Click()
Dim test
test = (CheckBox1 + CheckBox2)
Select Case test
Case 0
MsgBox "checkbox 1 et checkbox2 non cochés"
Case -1
MsgBox "checkbox 1 ou checkbox2 non cochés"
Case -2
MsgBox "checkbox 1 et checkbox2 cochés"
End Select
End Sub

Donc pour J-c

If (CheckBox1 + CheckBox2 ) = 0 Then MsgBox "Message à afficher"