300 Exemples

Sélectionnez le cas

Select Case

Au lieu de plusieurs instructions If Then dans Excel VBA , vous pouvez utiliser le Sélectionner la structure du cas .





Situation:

formule pour la moyenne pondérée dans Excel

Sélectionnez la casse dans Excel VBA





Placer un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code suivantes :

1. Tout d'abord, déclarez deux variables. Une variable de type Integer nommée score et une variable de type String nommée result.



RienButComme Entier, résultatComme Chaîne de caractères

2. On initialise la variable score avec la valeur de la cellule A1.

score = Plage('A1').Valeur

3. Ajoutez la structure Sélectionner un cas.

Sélectionner CasBut
Cas Est> = 80
résultat = 'très bien'
Cas Est> = 70
résultat = 'bien'
Cas Est> = 60
résultat = 'suffisant'
Cas Autre
résultat = 'insuffisant'
Finir Sélectionner

Explication : Excel VBA utilise la valeur de la variable score pour tester chaque instruction Case suivante afin de voir si le code sous l'instruction Case doit être exécuté.

4. Écrivez la valeur de la variable résultat dans la cellule B1.

Plage('B1').Valeur = résultat

5. Testez le programme.

Résultat lorsque vous cliquez sur le bouton de commande sur la feuille :

Sélectionner le résultat du cas

comment calculer les années dans Excel

Remarque : Excel VBA exécute le code sous la deuxième instruction Case pour toutes les valeurs supérieures ou égales à 70 et inférieures à 80.

3/9 Terminé ! En savoir plus sur les instructions if then >
Aller au chapitre suivant : Boucle



^