Conditions multiples dans Select Case

[marmotte18]

Bonjour,

Comment faut-il écrire l'instruction "si Condition A ou condition B est réalisée" dans un "Select Case" ?

Exemple d'une syntaxe qui ne fonctionne pas :

Select Case Donnée
     Case 1 Or 2 : Call T1
     Case Else : Call T2
End Select

Exemple qui fonctionne mais impose le dédoublement des conditions :

Select Case Donnée
     Case 1  : Call T1
     Case 2 : Call T1
     Case Else : Call T2
End Select

 

[joss56]

Re : Conditions multiples dans Select Case

Bonjour à tous

Remplace le "or" par une virgule
Bonne journée

Jocelyn

 

[eriiic]

Re : Conditions multiples dans Select Case

Bonjour tout le monde,

Séparer par une virgule oui, et tu peux aussi définir des plages avec to
Ex:
Case 1 To 5, 10 To 15, 20

eric

 

[JNP]

Re : Conditions multiples dans Select Case

Bonjour à tous 🙂,
Tant qu'à faire, tu peux aussi utiliser 😛 :

Is > 2

Bonne journée 😎

 

[marmotte18]

Re : Conditions multiples dans Select Case

Merci à tous, vos réponses me satisfont pleinement !

 

[marmotte18]

Re : Conditions multiples dans Select Case

Bonjour tout le monde,

J'ai essayé d'effectuer le traitement suivant mais le système ne fait que la 1ère condition :

Sub Trait()
Dim Note As Byte
Note = 12
Select Case Note
    Case 1, 8, 12: MsgBox "la valeur est 1, 8 ou 12"
    Case Is > 10: MsgBox "la valeur est supérieure à 10"
    Case 10 To 14: MsgBox "la valeur est comprise entre 10 et 14"
End Select
End Sub

Pourquoi ? Faut-il comprendre qu'Excel sort du "Select" dès qu'une condition est remplie ?

 

[JNP]

Re : Conditions multiples dans Select Case

Re 🙂,

J'ai essayé d'effectuer le traitement suivant mais le système ne fait que la 1ère condition
Pourquoi ? Faut-il comprendre qu'Excel sort du "Select" dès qu'une condition est remplie ?

Exactement 😛
Bonne journée 😎

 

[marmotte18]

Re : Conditions multiples dans Select Case

Merci JNP pour ta confirmation