Activez JavaScript dans le navigateur pour afficher les pages d'aide de LibreOfficeDev

Fonction Switch

Évalue une liste d'arguments se composant d'une expression suivie d'une valeur. La fonction Switch renvoie une valeur associée à l'expression transmise par cette fonction.

Syntaxe :


Switch (Expression1, Value1[, Expression2, Value2[..., Expression_n, Value_n]]) As Variant

Paramètres :

La fonction Switch évalue les expressions de gauche à droite, puis renvoie la valeur assignée à l'expression de la fonction. Si l'expression et la valeur ne sont pas données sous forme de paire, une erreur d'exécution se produit.

Expression : expression à évaluer.

Value : valeur à renvoyer si l'expression s'avère vraie (True).

Dans l'exemple suivant, la fonction Switch assigne le genre approprié au nom transmis à la fonction :

Codes d'erreur :

5 appel de procédure incorrect

Exemple :


Sub ExampleSwitch
Dim sGender As String
    sGender = GetGenderIndex( "John" )
    MsgBox sGender
End Sub
 
Function GetGenderIndex (sName As String) As String
    GetGenderIndex = Switch(sName = "Jeanne", "féminin", sName = "Jean", "masculin")
End Function