WENN ODER keine einzelne Anweisung sind, sind dies zwei logische Funktionen, die in VBA manchmal zusammen verwendet werden. Wir verwenden diese beiden logischen Funktionen zusammen, wenn wir mehr als ein Kriterium zur Überprüfung haben und wenn eines der Kriterien erfüllt ist, erhalten wir Das wahre Ergebnis, wenn wir die if-Anweisung verwenden. Die Anweisung wird zwischen den beiden Kriterien der If-Anweisung verwendet.
IF OR-Funktion in VBA
Logische Funktionen sind das Herzstück aller kriterienbasierten Berechnungen. "IF" ist die beliebteste logische Funktion, sei es als Arbeitsblattfunktion oder als VBA-Funktion, sie dient hervorragend unseren Anforderungen. Eine weitere logische Funktion, "ODER" in Excel, ist die am meisten unterschätzte Funktion. Es ist auch wichtig zu beherrschen, wenn es darum geht, komplexe Berechnungen zu lösen. In diesem Artikel werden wir Sie ausführlich durch die VBA IF OR-Funktion führen. Lesen Sie den vollständigen Artikel, um die Funktion im Detail zu erhalten.
Wie verwende ich IF mit ODER-Funktion in VBA?
Wir zeigen Ihnen ein einfaches Beispiel für die Verwendung der IF OR-Funktion in VBA.
Eine Kombination logischer Funktionen ist das beste Paar in Excel. Wenn Sie viele logische Formeln in der anderen logischen Formel kombinieren, bedeutet dies, dass für die Berechnung viele Testbedingungen erforderlich sind.
Schauen Sie sich nun die Syntax der IF OR-Funktion in VBA an.
(Test) ODER (Test) ODER (Test)
Dies ist das gleiche wie im Arbeitsblattbeispiel. Schauen Sie sich zum besseren Verständnis das folgende Beispiel an.
Wir haben hier den Preis des Vormonats, den Durchschnittspreis der letzten 6 Monate und den aktuellen Monatspreis.
Um zu entscheiden, ob wir das Produkt kaufen oder nicht, müssen wir hier einige Tests durchführen, und diese Tests sind es.
Wenn der aktuelle Preis kleiner oder gleich einem der beiden anderen Preise ist, sollten wir das Ergebnis als "Kaufen" oder als "Nicht kaufen" erhalten.
Schritt 1: Öffnen Sie die IF-Bedingung innerhalb des Unterverfahrens.
Code:
Sub IF_OR_Example1 () If End Sub
Schritt 2: Wenden Sie innerhalb der IF-Bedingung den ersten logischen Test als Bereich („D2“) an. Wert <= Bereich („B2“). Wert
Code:
Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value End Sub
Schritt 3: Die erste logische Bedingung ist erfüllt, jetzt öffnen Sie die OR-Anweisung.
Code:
Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value OR End Sub
Schritt 4: Wenden Sie nun die zweite logische Bedingung als Bereich ("D2") an. Wert <= Bereich ("C2"). Wert
Code:
Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value OR Range ("D2"). Value <= Range ("C2"). Value End Sub
Schritt 5: Ok, wir sind mit den logischen Tests hier fertig. Geben Sie nach den logischen Tests das Wort "Dann" ein.
Code:
Sub IF_OR_Example1 () Wenn Bereich ("D2"). Wert <= Bereich ("B2"). Wert oder Bereich ("D2"). Wert <= Bereich ("C2"). Wert Dann Ende Sub
Schritt 6: Schreiben Sie in die nächste Zeile, was das Ergebnis sein soll, wenn der logische Test WAHR ist. Wenn die Bedingung WAHR ist, benötigen wir das Ergebnis als "Kaufen" in Zelle E2.
Code:
Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value Or Range ("D2"). Value <= Range ("C2"). Value Then Range ("E2"). Wert = "Kaufen" End Sub
Schritt 7: Wenn das Ergebnis FALSE ist, sollten wir das Ergebnis als "Nicht kaufen" erhalten. Geben Sie in der nächsten Zeile "Else" ein und schreiben Sie den Code in die nächste Zeile.
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
Schritt 8: Schließen Sie die IF-Anweisung mit dem Wort "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, wir sind mit dem Codierungsteil fertig.
Lassen Sie uns diesen Code mit F5 oder manuell über die Ausführungsoption ausführen und sehen, was das Ergebnis in Zelle E2 ist.
Wir haben das Ergebnis als "Kaufen" erhalten, da der aktuelle monatliche Preis von Apple unter dem Preis sowohl des "vorherigen Monats" als auch des "6-Monats-Durchschnittspreises" liegt.
IF- oder VBA-Funktion mit Schleifen (erweitert)
Wenn Sie die Formel verstanden haben, versuchen Sie, sie mit einer größeren Anzahl von Zellen zu verwenden. Bei einer größeren Anzahl von Zellen können wir keine Codezeile schreiben, daher müssen wir VBA-Schleifen verwenden.
Für den obigen Datensatz habe ich einige weitere Zeilen hinzugefügt.
Wir müssen hier die For Next-Schleife verwenden.
Behalten Sie einfach den aktuellen Code bei.
Deklarieren Sie die Variable als Ganzzahl.
Öffnen Sie nun For Next Loop von 2 bis 9.
Ändern Sie nun überall dort, wo wir eine Zellreferenz haben, die aktuelle Nummer und verketten Sie die Variable „k“ damit.
Beispiel: Bereich ("D2"). Der Wert sollte Bereich ("D" & k) sein. Wert
Führen Sie nun den Code aus. Wir sollten den Status in allen Zellen erhalten.
Sie können den folgenden Code kopieren.
Code:
Sub IF_OR_Example1 () Dim k As Integer Für k = 2 bis 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
