Bonjour !
je ne maitrise pas bien les multiples conditions. Pouvez vous m'aider à formuler ?
Le contexte (dans un USF ) : un combobox et une textbox.
Les conditions :
- si le CBX et vide et le le TBX =0 alors : message box specifique
- si le CBX est vide mais le TBX =1 alors : message spécifique
- si le CBX est renseigné mais le TBX =0 alors : message specifique
j'ai tenté sans résultat :
If ComboBox1.Value = "" And TextBox29.Value = 0 Then
MsgBox "sélectionner une salle et une lampe.", vbCritical + vbOKOnly, "Erreur"
Exit Sub
End If
If ComboBox1.Value = "" And TextBox29.Value = 1 Then
MsgBox "sélectionner une lampe.", vbCritical + vbOKOnly, "Erreur"
Exit Sub
End If
If ComboBox1.Value <> "" And TextBox29.Value = 0 Then
MsgBox "sélectionner une salle.", vbCritical + vbOKOnly, "Erreur"
Exit Sub
End If
comment cumuler les 3 conditions ?
Bien à vous
Michel
je ne maitrise pas bien les multiples conditions. Pouvez vous m'aider à formuler ?
Le contexte (dans un USF ) : un combobox et une textbox.
Les conditions :
- si le CBX et vide et le le TBX =0 alors : message box specifique
- si le CBX est vide mais le TBX =1 alors : message spécifique
- si le CBX est renseigné mais le TBX =0 alors : message specifique
j'ai tenté sans résultat :
If ComboBox1.Value = "" And TextBox29.Value = 0 Then
MsgBox "sélectionner une salle et une lampe.", vbCritical + vbOKOnly, "Erreur"
Exit Sub
End If
If ComboBox1.Value = "" And TextBox29.Value = 1 Then
MsgBox "sélectionner une lampe.", vbCritical + vbOKOnly, "Erreur"
Exit Sub
End If
If ComboBox1.Value <> "" And TextBox29.Value = 0 Then
MsgBox "sélectionner une salle.", vbCritical + vbOKOnly, "Erreur"
Exit Sub
End If
comment cumuler les 3 conditions ?
Bien à vous
Michel