Opérateurs logiques VBA: ET, OU, PAS, SI PAS dans Excel VBA

Table des matières:

Anonim

Opérateurs logiques VBA: AND, OR, NOT

Opérateurs logiques Excel VBA

Supposons que vous souhaitiez traiter une commande client. Pour cela, vous voulez d'abord vérifier si le produit commandé existe ou non. Si c'est le cas, vous voulez également vérifier si la quantité disponible est suffisante. Les opérateurs logiques sont utiles dans de tels cas. Les opérateurs logiques sont utilisés pour évaluer plus d'une condition.

Les principaux opérateurs logiques Excel VBA ET, OU, NON sont répertoriés dans le tableau ci-dessous:

S / N Opérateur Description Exemple Production
1 ET AND: Ceci est utilisé pour combiner plus d'une condition. Si toutes les conditions sont vraies, AND prend la valeur true. Si l'une des conditions est fausse, AND prend la valeur fausse Si vrai = vrai ET faux = vrai ALORS faux
2 OU OU: Ceci est utilisé pour combiner plus d'une condition. Si l'une des conditions est évaluée à vrai, OR renvoie vrai. Si tous sont faux, OR renvoie faux Si vrai = vrai OU vrai = faux ALORS vrai
3 NE PAS NON: Celui-ci fonctionne comme une fonction inverse. Si la condition est vraie, elle renvoie fausse et si une condition est fausse, elle renvoie vraie. Si NON (vrai) Alors faux

Exemple de code source d'opérateurs logiques VBA

Par souci de simplicité, nous comparerons des nombres codés en dur.

Ajoutez des boutons ActiveX à la feuille à partir de l'option «Insérer».

Définissez les propriétés comme indiqué dans l'image ci-dessous

Opérateurs logiques VBA

Le tableau suivant présente les propriétés que vous devez modifier et les valeurs que vous devez également mettre à jour.

S / N Contrôler Biens Évaluer
1 CommandButton1 Nom btnAND
Légende Opérateur AND (0 = 0)
2 CommandButton2 Nom btnOR
Légende Opérateur OR (1 = 1) Ou (5 = 0)
3 CommandButton3 Nom btnNOT
Légende NOT Opérateur Non (0 =)

Ajoutez le code suivant à btnAND_Click

Private Sub btnAND_Click()If (1 = 1) And (0 = 0) ThenMsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"ElseMsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"End IfEnd Sub

Opérateur VBA If AND

  • "If (1 = 1) And (0 = 0) Then" l'instruction if utilise l'opérateur logique AND pour combiner deux conditions (1 = 1) And (0 = 0). Si les deux conditions sont vraies, le code au-dessus du mot-clé «Else» est exécuté. Si les deux conditions ne sont pas vraies, le code sous le mot-clé «Else» est exécuté.

Ajoutez le code suivant à btnOR_Click

Private Sub btnOR_Click()If (1 = 1) Or (5 = 0) ThenMsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"ElseMsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"End IfEnd Sub

Opérateur VBA If OR

  • "If (1 = 1) Or (5 = 0) Then" l'instruction if utilise l'opérateur logique OR pour combiner deux conditions (1 = 1) And (5 = 0). Si l'une des conditions est vraie, le code au-dessus du mot-clé Else est exécuté. Si les deux conditions sont fausses, le code sous le mot clé Else est exécuté.

Ajoutez le code suivant à btnNOT_Click

Private Sub btnNOT_Click()If Not (0 = 0) ThenMsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"ElseMsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"End IfEnd Sub

Opérateur VBA If NOT

  • "If Not (0 = 0) Then", la fonction VBA If Not utilise l'opérateur logique NOT pour annuler le résultat de la condition de l'instruction if. Si les conditions sont vraies, le code sous le mot-clé «Else» est exécuté. Si la condition est vraie, le code au-dessus du mot-clé Else est exécuté.

Téléchargez Excel contenant le code ci-dessus