Table des matières
Les instructions conditionnelles sont utilisées pour exécuter un ensemble d'actions en fonction de la condition spécifiée dans les langages de programmation. Si - Alors - Sinon déclaration conditionnelle dans VBA Excel est et comment l'utiliser.
Télécharger le cahier d'exercices
Vous pouvez télécharger le classeur Excel d'entraînement gratuit à partir d'ici.
If-Then-Else en VBA.xlsm
Introduction à l'instruction If - Then - Else en VBA
VBA If - Then - Else L'instruction conditionnelle est principalement utilisée pour décider du flux d'exécution des conditions. Si la condition est vraie, un certain nombre d'actions sont exécutées, et si la condition est fausse, un autre ensemble d'actions est exécuté.
- Syntaxe
Si condition Alors [déclarations] [Sinon autres_déclarations] Ou,
Si la condition est remplie, alors [déclarations] [Else [déclarations else_statements]] End If Ici,
| Arguments | Obligatoire/ Facultatif | Description |
|---|---|---|
| condition | Requis | Une expression numérique ou une expression de chaîne de caractères qui évalue si l'expression est Véritable ou Faux Si le condition est Null, il est considéré Faux . |
| déclarations | En option | Un formulaire d'une seule ligne qui n'a pas de Else Une ou plusieurs déclarations doivent être séparées par des deux-points. Si la clause condition est Véritable alors cette déclaration est exécutée. |
| autres_déclarations | En option | Une ou plusieurs déclarations sont effectuées si aucune condition est Véritable . |
4 exemples d'utilisation de l'instruction VBA If - Then - Else dans Excel
Dans cette section, vous apprendrez à utiliser le logiciel Si-Then-Else sur VBA avec 4 exemples.
Trouver le plus grand nombre entre deux nombres à l'aide de l'instruction If - Then - Else.
Si vous avez deux nombres et que vous voulez savoir lequel est le plus grand (ou le plus petit), vous pouvez utiliser la fonction Si-Then-Else déclaration dans VBA .
Des pas :
- Appuyez sur Alt + F11 sur votre clavier ou allez dans l'onglet Développeur -> ; Visual Basic pour ouvrir Éditeur Visual Basic .
- Dans la fenêtre pop-up du code, dans la barre de menu, cliquez sur Insertion -> ; Module .
- Copiez le code suivant et collez-le dans la fenêtre de code.
Private Sub BiggestNumber() Dim Num1 As Integer Dim Num2 As Integer Num1 = 12345 Num2 = 12335 If Num1> ; Num2 Then MsgBox "1st Number is Greater than the 2nd Number" ElseIf Num2> ; Num1 Then MsgBox "2nd Number is Greater than the 1st Number" Else MsgBox "1st Number and the 2nd Number are Equal" End If End Sub Votre code est maintenant prêt à être exécuté.
Ici, nous comparons deux nombres 12345 et 12335 Ce processus est généralement parfait pour trouver de grands nombres dans un grand ensemble de données.
- Appuyez sur F5 sur votre clavier ou dans la barre de menu, sélectionnez Run -> ; Run Sub/UserForm Vous pouvez également cliquer sur le bouton petite icône Play dans la barre de sous-menu pour exécuter la macro.
Vous obtiendrez le résultat dans la fenêtre d'Excel MsgBox
Dans notre cas, le nombre 12345 - stocké dans la variable Num1 - est plus grand que le nombre 12335 , Num2 Ainsi, le MsgBox nous montre que le Le 1er nombre est plus grand que le 2ème nombre .
Lire la suite : Formule Excel pour générer un nombre aléatoire (5 exemples)
Vérification du résultat d'un élève à l'aide de l'instruction If - Then - Else en VBA
Vous pouvez vérifier si un étudiant réussit ou échoue à un examen grâce à cette déclaration dans la fenêtre de l'examen. VBA code.
Des pas :
- De la même manière que précédemment, ouvrez Éditeur Visual Basic de la Développeur et Insérer a Module dans la fenêtre de code.
- Dans la fenêtre de code, copiez le code suivant et collez-le.
Sub CheckResult() If Range("D5").Value> ; 33 Then MsgBox "John's Result is Pass" Else MsgBox "John's Result is Fail" End If End Sub Votre code est maintenant prêt à être exécuté.
Ce code va vérifier si la cellule D5 détient une valeur supérieure à 33 S'il le fait, il affichera une sortie, sinon, il affichera autre chose.
- Exécuter la macro et vous obtiendrez le résultat selon votre code.
Regardez l'ensemble de données ci-dessus avec le résultat, Cellule D5 tient 95 ce qui est certainement plus que 33 il affiche donc le Le résultat est "Pass". Mais si nous exécutons le code pour la cellule D7 (22), alors il s'afficherait autrement.
Lire la suite : Comment utiliser l'énoncé de cas VBA (13 exemples)
Lectures similaires
- Comment utiliser la fonction Log dans Excel VBA (5 exemples pertinents)
- Utiliser la fonction VBA LTrim dans Excel (4 exemples)
- Comment utiliser la fonction VBA FileDateTime dans Excel (3 utilisations)
- Utiliser l'opérateur Mod de VBA (9 exemples)
- Fonction VBA EXP dans Excel (5 exemples)
Mise à jour des commentaires dans les notes des élèves à l'aide de plusieurs instructions If - Then - Else en VBA.
Vous avez appris à extraire si un élève passe ou non avec un seul... Si-Then-Else mais cette fois-ci, vous allez apprendre à Plusieurs If-Then-Else à l'aide de l'exemple suivant.
Nous allons organiser un VBA code pour remplir ces Commentaire sur la base de plusieurs conditions.
Des pas :
- De la même manière que précédemment, ouvrez Éditeur Visual Basic de la Développeur et Insérer a Module dans la fenêtre de code.
- Dans la fenêtre de code, copiez le code suivant et collez-le.
Sub UpdateComment() For Each grade In Range("D5:D10") If grade = "A" Then grade.Offset(0, 1).Value = "Great Work" ElseIf grade = "B" Then grade.Offset(0, 1).Value = "Keep It Up" ElseIf grade = "C" Then grade.Offset(0, 1).Value = "Needs Improvement" Else grade.Offset(0, 1).Value = "Parents-Teacher Meeting" End If Next grade EndSous Votre code est maintenant prêt à être exécuté.
Ce code imprimera les commentaires en fonction de la note obtenue par les étudiants.
- Exécuter ce code et voir l'image suivante où les cases de commentaires sont remplies par les résultats appropriés.
4. l'instruction If-Then-Else pour mettre à jour les directions cardinales en fonction du code dans Excel.
Vous pouvez également utiliser le Si-Then-Else pour trouver les directions cardinales sur la base du code indicateur fourni. Regardez l'image suivante où nous allons trouver les directions sur la base des initiales qui ont été données.
Des pas :
- Ouvrir Éditeur Visual Basic de la Développeur et Insérer a Module dans la fenêtre de code.
- Dans la fenêtre de code, copiez le code suivant et collez-le.
Sub UpdateDir() For Each iDirection In Range("B5:B8") If iDirection = "N" Then iDirection.Offset(0, 1).Value = "North" ElseIf iDirection = "S" Then iDirection.Offset(0, 1).Value = "South" ElseIf iDirection = "E" Then iDirection.Offset(0, 1).Value = "East" Else iDirection.Offset(0, 1).Value = "West" End If Next iDirection EndSous Votre code est maintenant prêt à être exécuté.
- Exécuter ce code et vous obtiendrez les noms des directions dans les cellules respectives.
Ou, si vous voulez trouver une seule direction basée sur le code, alors vous pouvez utiliser le code ci-dessous.
Sub UpdateDirections() Dim iDirection As String Dim iDirectionName As String iDirection = Range("B5").Value If iDirection = "N" Then iDirectionName = "North" ElseIf iDirection = "S" Then iDirectionName = "South" ElseIf iDirection = "E" Then iDirectionName = "East" Else iDirectionName = "West" End If Range("C5").Value = iDirectionName End Sub Ce code va prendre la valeur de la cellule B5 en considération et renvoie le résultat en fonction de celle-ci dans la cellule C5 .
Par exemple, si vous écrivez " N " dans Cell B5 il vous donnera " Nord ; si vous écrivez " S " dans Cell B5 il vous montrera " Sud " dans Cell C5 .
Conclusion
Cet article vous a montré comment utiliser le Si - Alors - Sinon dans Excel avec VBA J'espère que cet article vous a été très utile. N'hésitez pas à me demander si vous avez des questions sur le sujet.
