Un programme informatique bien écrit peut gagner du temps pour le développeur et les programmeurs qui le maintiennent à l'avenir. Dans VBA, vous pouvez utiliser l'instruction Select Case comme une alternative à l'utilisation de " ElseIf " dans les états " If ... Then ... Else" . Un programme devient difficile à lire quand vous avez beaucoup de " If ... Then ... Else" déclarations et peut également fonctionner plus lentement que si vous utilisez Select Case . Une instruction Select Case évalue l'expression seule fois alors que le " if ... else ... then» doivent évaluer chaque étape avant l'exécution de code. Instructions
1
Cliquez sur l'onglet " développeur" , cliquez sur " Visual Basic ", et cliquez sur le menu "Insertion" . Cliquez sur " Module " pour insérer un nouveau module de code
2
Commencez par créer un sous procédure en utilisant le code suivant : .
Private Sub CaseSwitch ()
3
Créez trois variables en tapant les lignes de code suivantes:
employeePerf As Integer
salaire As Monnaie
Bonus As Monnaie
Hôtels 4
définir des valeurs pour le salaire et les variables de employeePerf :
salaire = 75000
employeePerf = 3
5
utiliser l'instruction Select Case pour déterminer le montant du bonus en fonction du rendement de l'employé et son salaire de base.
Select Case employeePerf
cas 1
Bonus = salaire * 0,1
cas n ° 2 , 3
Bonus = salaire * 0,09
Case 4 à 6
Bonus = salaire * 0,07
Case Is> 8
Bonus
= 100
Case Else
Bonus = 0
End Select
6
Afficher le montant du bonus en utilisant la fenêtre Exécution. Photos
Debug.Print Bonus
7
Fin de la procédure en tapant " End Sub ". Appuyez sur la touche "F5 " pour exécuter le code.