Ou est une fonction logique dans l'un des langages de programmation et similaire en VBA, nous avons la fonction OU, car c'est une fonction logique le résultat donné par cette fonction est soit vrai soit faux, cette fonction est utilisée pour deux ou plusieurs conditions ensemble et donne us true result lorsque l'une des conditions est retournée true.
Qu'est-ce que la fonction OR dans VBA?
Dans Excel, les fonctions logiques sont au cœur des formules que nous utilisons au quotidien. Les fonctions logiques sont là pour effectuer le test logique et donnent le résultat en type de données booléen, c'est-à-dire VRAI ou FAUX. Certaines des formules logiques dans Excel sont "IF, IFERROR dans Excel, ISERROR dans Excel, AND et OR excel." J'espère que vous les avez utilisés assez souvent comme fonction de feuille de calcul. En VBA également, nous pouvons tous les utiliser, et dans cet article, nous vous expliquerons comment utiliser la fonction «VBA OR».
Quelle est la première chose qui vous vient à l'esprit lorsque vous pensez au mot «OU»?
En termes simples, "OU" signifie "ceci ou cela"
Avec la même idée, OR est une fonction logique qui donne le résultat VRAI si l'un des tests logiques est VRAI et donne FAUX comme résultat si aucun des tests logiques n'est VRAI.
Cela fonctionne exactement à l'opposé de la fonction VBA AND. La fonction AND renvoie VRAI uniquement si toutes les conditions logiques sont VRAIES. Si l'une des conditions n'est pas remplie, nous obtiendrons FAUX en conséquence.
La formule de la fonction VBA OR
Laissez-moi définir une syntaxe pour que vous compreniez la fonction.
(Test logique) OU (Test logique) OU (Test logique)
Tout d'abord, nous devons mentionner quel est le test logique, puis mentionner le mot OR, puis mentionner ce qu'est le deuxième test logique. Si vous souhaitez effectuer un test plus logique, mentionnez le mot OR après avoir évité un test logique.
De tous les tests logiques que vous effectuez, si l'un des tests est satisfait ou vrai, alors nous obtiendrons le résultat VRAI si aucun ou satisfait, alors le résultat est FALSE.
Exemples d'utilisation de la fonction OR dans VBA
Nous allons vous montrer un exemple simple d'utilisation de la fonction OR dans VBA.
Pour comprendre la fonction logique VBA OU laissez-moi vous donner un exemple. Disons que nous voulons effectuer le test logique si le nombre 25 est supérieur à 20 ou le nombre 50 est inférieur à 30.
Étape 1: Créez un nom de macro.
Étape 2: définissez la variable sous forme de chaîne.
Code:
Sub OR_Example1 () Dim i As String End Sub
Étape 3: Maintenant, pour cette variable, nous allons attribuer la valeur via le test logique OR.
Code:
Sub OR_Example1 () Dim i As String i = End Sub
Étape 4: Notre premier test logique est 25> 20 .
Code:
Sub OR_Example1 () Dim i As String i = 25> 20 End Sub
Étape 5: Maintenant, après le premier test logique, mentionnez le mot OR et entrez le deuxième test logique.
Code:
Sub OR_Example1 () Dim i As String i = 25> 20 Ou 50 <30 End Sub
Étape 6: Ok, maintenant la fonction VBA OR teste si les tests logiques sont TRUE ou FALSE. Attribuez maintenant le résultat de la variable à la boîte de message VBA .
Code:
Sub OR_Example1 () Dim i As String i = 25> 20 Ou 50 <30 MsgBox i End Sub
Étape 7: Exécutez la macro et quel est le résultat.
Nous avons obtenu le résultat VRAI car sur deux tests logiques que nous avons fournis, un test est VRAI, donc le résultat est VRAI.
25 est supérieur à 20 et 50 n'est pas inférieur à 30. Dans ce cas, le premier test logique est VRAI, mais le second est FAUX. Étant donné que nous avons appliqué la fonction VBA OR, il faut que l'une des conditions soit TRUE pour obtenir le résultat TRUE.
Maintenant, regardez le code ci-dessous.
Code:
Sub OR_Example1 () Dim i As String i = 25 = 20 Ou 50 = 30 MsgBox i End Sub
J'ai changé les équations de test logiques de> et <au signe égal (=). Cela renverra FALSE comme résultat car 25 n'est pas égal à 20 et 50 n'est pas égal à 30.
La fonction VBA OR avec condition IF est puissante
Comme je l'ai dit, OR peut retourner VRAI ou FAUX en conséquence, mais avec l'autre fonction logique «IF», nous pouvons manipuler les résultats selon nos besoins.
Prenez les mêmes tests logiques ci-dessus, OR n'a renvoyé que TRUE ou FALSE, mais combinons ce OR avec IF.
Étape 1: Avant d'effectuer un test, ouvrez la fonction IF .
Code:
Sub OR_Example2 () Dim i As String IF End Sub
Étape 2: Maintenant, effectuez des tests à l'aide de la fonction OR .
Code:
Sub OR_Example2 () Dim i As String IF 25 = 20 Ou 50 = 30 End Sub
Step 3: Put the word “Then” and write the result. If the condition is TRUE, assign the value to the variable as “Condition is Satisfied.”
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" End Sub
Step 4: If the condition is FALSE, then we need a different result, so put the word “ELSE” and, in the next line, assign the value to the variable “what should be the result if the condition or logical test is FALSE.”
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End Sub
Step 5: End the IF function with the word “End If.”
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End If End Sub
Step 6: Assign the value of the variable result to the message box.
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End If MsgBox i End Sub
Run the macro, if the logical test is TRUE, we will get the result as “Condition is Satisfied,” or else we will get “Condition is not Satisfied.”
We got the result as “Condition is not Satisfied” because both the logical tests are FALSE.
Now I will change the logical tests.
Code:
Sub OR_Example2() Dim i As String If 25> 20 Or 50 < 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End If MsgBox i End Sub
I will run the macro and see what the result is.
Like this, we can use one logical function with other logical functions to arrive at the results.
Solve the below case study to get used to logical functions.
Case Study to Solve
I have employee names and their respective departments.
If you have tried and not found the result, then you can refer below code to understand the logic.
Code:
Sub Bonus_Calculation() Dim i As Long For i = 2 To 10 If Cells(i, 2).Value = "Finance" Or Cells(i, 2).Value = "IT" Then Cells(i, 3).Value = 5000 Else Cells(i, 3).Value = 1000 End If Next i End Sub
Si l'employé est de «Finance» ou «IT», alors il devrait recevoir le bonus de «5000». Pour les autres employés du service, la prime est de «1000».
Effectuez le test logique et obtenez les résultats.
