VBA IF OU | Comment utiliser la condition IF avec la fonction OR dans Excel VBA?

SI OU ne sont pas une seule instruction, ce sont deux fonctions logiques qui sont utilisées à plusieurs reprises dans VBA, nous utilisons ces deux fonctions logiques ensemble lorsque nous avons plus d'un critère à vérifier et si l'un des critères est rempli, nous obtenons le vrai résultat, lorsque nous utilisons l'instruction if ou l'instruction est utilisée entre les deux critères de l'instruction If.

Fonction IF OR dans VBA

Les fonctions logiques sont au cœur de tout calcul basé sur des critères. «IF» est la fonction logique la plus populaire, que ce soit en tant que fonction de feuille de calcul ou en tant que fonction VBA, elle répond parfaitement à nos besoins. Mais une autre fonction logique «OU» dans Excel est la fonction la plus sous-estimée. Il est également important de maîtriser la résolution de calculs complexes. Dans cet article, nous vous expliquerons en détail la fonction VBA IF OR. Lisez l'article complet pour obtenir la fonction en détail.

Comment utiliser IF avec la fonction OR dans VBA?

Nous allons vous montrer un exemple simple d'utilisation de la fonction IF OR dans VBA.

Vous pouvez télécharger ce modèle VBA IF OU Excel ici - Modèle VBA IF OU Excel

La combinaison de fonctions logiques est la meilleure paire d'Excel. Lorsque vous combinez de nombreuses formules logiques dans l'autre formule logique, cela suggère que le calcul nécessite de nombreuses conditions à tester.

Maintenant, regardez la syntaxe de la fonction IF OR dans VBA.

[Test] OU [Test] OU [Test]

C'est le même que nous avons vu dans l'exemple de feuille de calcul. Pour une meilleure compréhension, regardez l'exemple ci-dessous.

Nous avons ici le prix du mois précédent, le prix moyen des 6 derniers mois et le prix mensuel actuel.

Pour décider d'acheter ou non le produit, nous devons faire quelques tests ici et ces tests le sont.

Si le prix actuel est inférieur ou égal à l'un des deux autres prix, nous devrions obtenir le résultat comme «acheter» ou bien obtenir le résultat comme «ne pas acheter» .

Étape 1: Ouvrez la condition IF dans la sous-procédure.

Code:

 Sub IF_OR_Example1 () If End Sub

Étape 2: Dans la condition IF, appliquez le premier test logique sous la forme Range («D2»). Valeur <= Range («B2»). Valeur

Code:

 Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value End Sub

Étape 3: La première condition logique est remplie, ouvrez maintenant l'instruction OR.

Code:

 Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value OR End Sub

Étape 4: appliquez maintenant la deuxième condition logique en tant que plage («D2»). Valeur <= plage («C2»). Valeur

Code:

 Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value OR Range ("D2"). Value <= Range ("C2"). Value End Sub

Étape 5: Ok, nous avons terminé les tests logiques ici. Après les tests logiques, mettez le mot «Alors».

Code:

 Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value Or Range ("D2"). Value <= Range ("C2"). Value Then End Sub

Étape 6: Dans la ligne suivante, écrivez quel devrait être le résultat si le test logique est VRAI. Si la condition est VRAIE, nous avons besoin du résultat «Acheter» dans la cellule E2.

Code:

 Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value Or Range ("D2"). Value <= Range ("C2"). Value Then Range ("E2"). Valeur = "Acheter" End Sub

Étape 7: Si le résultat est FAUX, nous devrions obtenir le résultat «Ne pas acheter». Donc, dans la ligne suivante, mettez «Else» et écrivez le code dans la ligne suivante.

Code:

 Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value Or Range ("D2"). Value <= Range ("C2"). Value Then Range ("E2"). Value = "Buy" Else Range ("E2"). Value = "Do Not Buy" End Sub

Étape 8: Fermez l'instruction IF avec le mot «End If».

Code:

 Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value Or Range ("D2"). Value <= Range ("C2"). Value Then Range ("E2"). Value = "Buy" Else Range ("E2"). Value = "Do Not Buy" End If End Sub

Ok, nous en avons terminé avec la partie codage.

Exécutons ce code à l'aide de F5 ou manuellement via l'option d'exécution et voyons le résultat dans la cellule E2.

Nous avons obtenu le résultat «Acheter» car le prix mensuel actuel d'Apple est inférieur au prix du «Mois précédent» et du «Prix moyen sur 6 mois».

Fonction IF OU VBA avec boucles (avancé)

Une fois que vous avez compris la formule, essayez de l'utiliser avec un plus grand nombre de cellules. Dans le cas d'un plus grand nombre de cellules, nous ne pouvons écrire aucune ligne de code, nous devons donc utiliser des boucles VBA.

Pour l'ensemble de données ci-dessus, j'ai ajouté quelques lignes supplémentaires.

Nous devons utiliser la boucle For Next ici.

Gardez simplement le code actuel tel quel.

Déclarez la variable comme un entier.

Maintenant, ouvrez la boucle suivante de 2 à 9.

Maintenant, partout où nous avons une référence de cellule change le nombre actuel et concatène la variable «k» avec eux.

Par exemple Range ("D2"). La valeur doit être Range ("D" & k).

Maintenant, exécutez le code, nous devrions obtenir le statut dans toutes les cellules.

Vous pouvez copier le code ci-dessous.

Code:

 Sub IF_OR_Example1() Dim k As Integer For k = 2 To 9 If Range("D" & k).Value <= Range("B" & k).Value Or Range("D" & k).Value <= Range("C" & k).Value Then Range("E" & k).Value = "Buy" Else Range("E" & k).Value = "Do Not Buy" End If Next k End Sub