Die wichtigsten Bedingungsanweisungen, die in Excel VBA verwendet werden, sind die Anweisungen Wenn, dann и Fall auswählen. Beide Ausdrücke testen eine oder mehrere Bedingungen und führen je nach Ergebnis unterschiedliche Aktionen aus. Auf diese beiden Bedingungsoperatoren werden wir als Nächstes ausführlicher eingehen.
„If…Then“-Anweisung in Visual Basic
Operator Wenn, dann prüft die Bedingung und wenn sie wahr (TRUE) ist, dann wird der angegebene Satz von Aktionen ausgeführt. Es kann auch eine Reihe von Aktionen definieren, die ausgeführt werden sollen, wenn die Bedingung FALSCH ist.
Operatorsyntax Wenn, dann so was:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
In diesem Ausdruck sind die Elemente Sonst и sonst Bedingungen Operator können weggelassen werden, wenn sie nicht benötigt werden.
Unten ist ein Beispiel, in dem mit dem Operator Wenn, dann Die Füllfarbe der aktiven Zelle ändert sich je nach Wert darin:
If ActiveCell.Value < 5 Then ActiveCell.Interior.Color = 65280 'Dieser Wert wird in einer goldenen Farbe angezeigt. ElseIf ActiveCell.Value < 10 Then ActiveCell.Interior.Color = 49407 'Dieser Wert wird in einer orangefarbenen Farbe angezeigt Else ActiveCell.Interior.Color = 255 'Fehler Wird in einer roten Farbe angezeigt. End If
Beachten Sie, dass die Ausführung der bedingten Anweisung abgebrochen wird, sobald die Bedingung wahr wird. Wenn also der Wert der Variablen Aktive Zelle kleiner als 5, dann wird die erste Bedingung wahr und die Zelle wird grün gefärbt. Danach die Ausführung der Aussage Wenn, dann unterbrochen und die anderen Bedingungen werden nicht geprüft.
Erfahren Sie mehr über die Verwendung des Bedingungsoperators in VBA Wenn, dann finden Sie im Microsoft Developer Network.
"Select Case"-Anweisung in Visual Basic
Operator Fall auswählen ähnlich wie Betreiber Wenn, dann , dass es auch den Wahrheitsgehalt der Bedingung überprüft und je nach Ergebnis eine der Optionen auswählt.
Operatorsyntax Fall auswählen so was:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
Element Case Else ist nicht erforderlich, wird aber für den Umgang mit unerwarteten Werten empfohlen.
Verwenden Sie im folgenden Beispiel das Konstrukt Fall auswählen ändert die Füllfarbe der aktuellen Zelle abhängig vom darin enthaltenen Wert:
Select Case ActiveCell.Value Case Is <= 5 ActiveCell.Interior.Color = 65280 'Dieses wird in der goldenen Farbe angezeigt Case 6, 7, 8, 9 ActiveCell.Interior.Color = 49407' Wird in der orangen Farbe angezeigt Case 10 ActiveCell.Interior. Color = 65535 'wird in kleinen Blumen angezeigt Case 11 bis 20 ActiveCell.Interior.Color = 10498160 'wird in kleinen Blumen angezeigt Case Else ActiveCell.Interior.Color = 255 'wird angezeigt ивается в красный цвет End Select
Das obige Beispiel zeigt, wie Sie einen Wert für ein Element auf verschiedene Weise festlegen können. Gehäuse im Aufbau Fall auswählen. Dies sind die Wege:
| Fall ist <= 5 | Verwenden Sie daher das Schlüsselwort Fall ist Sie können überprüfen, ob der Wert erfüllt ist Ausdrücke Zustand des Formulars <= 5. |
| Gehäuse 6, 7, 8, 9 | Auf diese Weise können Sie überprüfen, ob der Wert übereinstimmt Ausdrücke mit einem der aufgeführten Werte. Die aufgelisteten Werte sind durch Kommas getrennt. |
| Gehäuse 10 | Dies prüft, ob der Wert übereinstimmt Ausdrücke mit einem bestimmten Wert. |
| Gehäuse 11 Das ist es 20 | Sie können also einen Ausdruck schreiben, um zu prüfen, ob der Wert erfüllt ist Ausdrücke Zustand des Formulars von 11 um 20 (entspricht der Ungleichung „11<=Wert<=20“). |
| Case Else | So mit dem Schlüsselwort sonst, Aktionen werden für den Fall angezeigt, wenn der Wert Ausdrücke stimmt mit keiner der aufgeführten Optionen überein Gehäuse. |
Sobald eine der Bedingungen gefunden wird, werden die entsprechenden Aktionen ausgeführt und die Struktur beendet. Fall auswählen. Das heißt, es wird in jedem Fall nur einer der aufgeführten Zweige ausgeführt. Gehäuse.
Weitere Informationen zur Funktionsweise der VBA-Anweisung Fall auswählen finden Sie im Microsoft Developer Network.