Les sujets:

Les partenaires publicitaires:

Réponses populaires

Questions connexes

Les partenaires publicitaires:

Comment utiliser un commutateur de cas dans Excel VBA

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 "si ... alors ... Else" déclarations. Un programme devient difficile à lire quand vous avez beaucoup de "Si ... Then ... Else" des déclarations et pouvez également exécuter plus lentement que si vous utilisez Select Case. Une instruction Select Case évalue l'expression seule fois tandis que le "Si ... Sinon ... Puis" déclarations doivent évaluer chaque étape avant l'exécution de code.

Instructions

  1. Cliquez sur l'onglet "Developer", 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 une procédure sous en utilisant le code suivant:

    Private Sub CaseSwitch ()

  3. Créez trois variables en tapant les lignes de code suivantes:

    Dim employeePerf As Integer

    Salaire Dim comme devise

    Bonus Dim comme devise

  4. Définir des valeurs pour les variables des salaires et des employeePerf:




    salaire = 75000

    employeePerf = 3

  5. Utilisez l'instruction Select de cas pour déterminer le montant du bonus en fonction du rendement de l'employé et de leur salaire de base.

    Select Case employeePerf

    Cas 1
    Bonus = salaire * 0,1
    Cas 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.

    Debug.Print Bonus

  7. Terminer la procédure en tapant "End Sub". Appuyez sur "F5" pour exécuter le code.

Questions connexes

» » » » Comment utiliser un commutateur de cas dans Excel VBA