Instruction sélection de la casse

Permet d’exécuter un groupe d’instructions, en fonction de la valeur d’une expression.

Syntaxe

Sélectionnez la casse testexpression
[ Case expressionlist-n [ statements-n ]]
[ Case Else [ elsestatements ]]
Fin de la sélection


La syntaxe de l’instruction Sélectionnez la casse comprend les éléments suivants :

Élément Description
testexpression Obligatoire. Toute expression numérique ou expression de chaîne.
expressionlist-n Obligatoire si une casse s’affiche.

Liste délimitée d’une ou plusieurs des formes suivantes : expression, expressionàexpression, est OpérateurComparaison expression.

Le à mot clé spécifie une plage de valeurs. Si vous utilisez le mot clé To, la valeur inférieure doit apparaître avant To.

Utilisez le mot clé Is avec des opérateurs de comparaison (à l'exception de Is et Like) pour spécifier une plage de valeurs. S'il n'est pas fourni, le mot clé Is est automatiquement inséré.
statements-n Facultatif. Une ou plusieurs instructions exécutées si testexpression correspond à une partie quelconque de listeexpressions-n.
elsestatements Facultatif. Une ou plusieurs instructions exécutées si testexpression ne correspond à aucune des clauses casse.

Remarques

Si testexpression correspond à une expression casse listeexpressions, les instructions suivantes cette clause casse sont exécutées jusqu'à la prochaine clause casse, ou pour la dernière clause, jusqu'à fin de la sélection. Le contrôle passe ensuite à l’instruction suivante fin de la sélection. Si testexpression correspond à une expression listeexpressions dans plusieurs clauses casse, seules les instructions qui suivent la première correspondance sont exécutées.

La clause autre casse est utilisée pour indiquer la elsestatements qui doit être exécutée si aucune correspondance n’est trouvée entre la testexpression et une listeexpressions dans d’autres sélections casse. Bien que pas obligatoire, il peut être judicieux d’avoir une instruction autre casse dans votre bloc sélectionnez la casse pour traiter des valeurs testexpression imprévues. Si aucune casse listeexpressions ne correspond à testexpression et il n’y a aucune déclaration autre casse, l’exécution continue à l’instruction suivante fin de la sélection.

Vous pouvez utiliser plusieurs expressions ou plages dans chaque clause casse. Par exemple, la ligne suivante est valide :

Case 1 To 4, 7 To 9, 11, 13, Is > MaxNumber 

Notes

L’opérateur de comparaison est n’est pas identique au mot-clé est utilisé dans la déclaration sélectionnez la casse.

Vous pouvez également spécifier des plages et des expressions multiples pour les chaînes de caractères. Dans l’exemple suivant, casse correspond à des chaînes qui sont exactement égales à everything, des chaînes s’inscrivant entre nuts et soup dans l’ordre alphabétique, ainsi que la valeur actuelle du TestItem:

Case "everything", "nuts" To "soup", TestItem 

Les instructions Sélectionnez la casse peuvent être imbriquées. Chaque instruction imbriquée sélectionnez la casse doit posséder une correspondance avec une instruction fin de la sélection .

Exemple

Cet exemple utilise l’instruction sélectionnez la casse pour évaluer la valeur d’une variable. La deuxième clause casse contient la valeur de la variable en cours d’évaluation et par conséquent uniquement l’instruction associée est exécutée.

Dim Number 
Number = 8    ' Initialize variable. 
Select Case Number    ' Evaluate Number. 
Case 1 To 5    ' Number between 1 and 5, inclusive. 
    Debug.Print "Between 1 and 5" 
' The following is the only Case clause that evaluates to True. 
Case 6, 7, 8    ' Number between 6 and 8. 
    Debug.Print "Between 6 and 8" 
Case 9 To 10    ' Number is 9 or 10. 
Debug.Print "Greater than 8" 
Case Else    ' Other values. 
    Debug.Print "Not between 1 and 10" 
End Select

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.