Zum Hauptinhalt springen

VBA Excel: Auswahl anhand von Case Select Else-Bedingungen

In der VBA-Programmierung (Visual Basic for Applications) für Excel werden häufig bedingte Stichprobenoperatoren verwendet, mit denen Sie abhängig von den angegebenen Bedingungen verschiedene Aktionen ausführen können. Eine solche Anweisung ist Case Select Else.

Mit der Case Select Else-Anweisung können Sie anhand einer Vielzahl von Bedingungen eine Stichprobe erstellen und bestimmte Aktionen ausführen, abhängig vom Ergebnis der Stichprobe. Sie können mehrere Auswahlmöglichkeiten festlegen und festlegen, welche Aktionen ausgeführt werden sollen, wenn eine der angegebenen Bedingungen erfüllt ist.

Die Syntax der Case Select Else-Anweisung lautet wie folgt:

Select Case Ausdruck

Case Wert1

.

Case Wertn

Case Else

Handeln

End Select

Wenn Sie die Case Select Else-Anweisung verwenden, geben Sie zuerst den Ausdruck an, nach dem die Auswahl erfolgt. Die Case-Blöcke geben dann die Werte an, die mit diesem Ausdruck abgerufen werden können. Wenn der Wert des Ausdrucks mit einem der angegebenen Werte übereinstimmt, werden die nach dem Case angegebenen Aktionen ausgeführt.

Definition von Case Select Else

Select Design. Mit Case können Sie den Wert einer Variablen mit einer Reihe verschiedener Optionen vergleichen und eine entsprechende Aktion ausführen, wenn der Wert mit einer dieser Optionen übereinstimmt. Die Case Select Else-Anweisung fügt eine zusätzliche Standardoption hinzu, die ausgeführt wird, wenn keine der anderen Optionen mit dem Wert der Variablen übereinstimmt.

Die Syntax der Case Select Else-Anweisung lautet wie folgt:

Select Case variableCase value1' действия в случае, когда значение равно value1Case value2' действия в случае, когда значение равно value2. Case Else' действия в случае, когда значение не соответствует ни одному из предыдущих вариантовEnd Select

Die Case Else-Anweisung ist optional und kann weggelassen werden, wenn Sie keine Aktionen ausführen möchten, wenn der Wert einer Variablen mit keiner der vorherigen Optionen übereinstimmt. Wenn in diesem Fall alle Optionen nicht mit dem Wert der Variablen übereinstimmen, wird das Programm nach der End Select-Anweisung fortgesetzt.

Syntax für die Verwendung von Case Select Else

Syntax für Stichproben nach Bedingungen Case Select Else in der Programmiersprache VBA ermöglicht Excel verschiedene Aktionen, abhängig davon, ob der Wert einer Variablen den angegebenen Bedingungen entspricht.

Allgemeine Syntaxstruktur Case Select Else sieht wie folgt aus:

  1. Select Case ist das Schlüsselwort zum Starten der Stichprobe.
  2. Eine Variable ist eine Variable, deren Wert überprüft werden soll.
  3. Case Wert1 ist eine Bedingung, die mit dem Wert einer Variablen übereinstimmen muss.
  4. Aktion1 ist die Aktion, die ausgeführt wird, wenn die Bedingung mit dem Wert der Variablen übereinstimmt.
  5. Case Wert2 ist die nächste Bedingung, die mit dem Wert einer Variablen übereinstimmen muss.
  6. Aktion2 ist die Aktion, die ausgeführt wird, wenn die Bedingung mit dem Wert der Variablen übereinstimmt.
  7. . - die Abfolge der Bedingungen und der damit verbundenen Handlungen.
  8. Else ist ein Schlüsselwort, um eine Aktion anzugeben, die ausgeführt wird, wenn keine der Bedingungen mit dem Wert der Variablen übereinstimmt.
  9. Aktionelse ist eine Aktion, die ausgeführt wird, wenn keine der Bedingungen mit dem Wert der Variablen übereinstimmt.
  10. End Select - Das Schlüsselwort, das das Ende der Auswahl angibt.

Beispiel für die Verwendung der Syntax Case Select Else:

Dim Farbe Als String

Select Case Farbe

MsgBox "Sie haben die Farbe Rot gewählt!"

MsgBox "Sie haben die blaue Farbe gewählt!"

MsgBox "Sie haben Gelb gewählt!"

MsgBox "Wählen Sie eine Farbe aus den vorgeschlagenen Optionen!"

In diesem Beispiel ist die Variable Farbe grün , sodass ein Codeblock ausgeführt wird, der mit dem Else-Schlüsselwort verknüpft ist. Wenn das Makro ausgeführt wird, wird die Meldung "Wählen Sie eine Farbe aus den vorgeschlagenen Optionen aus!".

Syntax Case Select Else ermöglicht es Ihnen, verschiedene Variablenwerte einfach und bequem zu verarbeiten, indem Sie je nach erfüllten Bedingungen entsprechende Aktionen anwenden.

Beispiele für die Verwendung von Case Select Else

In VBA Excel können Sie mit der Case Select Else-Anweisung einen Codeblock basierend auf dem Wert einer Variablen ausführen. Diese Anweisung ist besonders nützlich, wenn Sie mit vielen Bedingungen arbeiten, da Sie den Code vereinfachen und besser lesbar machen können.

Hier sind einige Beispiele für die Verwendung der Case Select Else-Anweisung :

Function GetStatusText(status As String) As StringDim statusText As StringSelect Case statusCase "Open"statusText = "Заявка открыта"Case "In Progress"statusText = "Заявка в процессе выполнения"Case "Closed"statusText = "Заявка закрыта"Case ElsestatusText = "Статус неизвестен"End SelectGetStatusText = statusTextEnd Function
Sub PrintGrade(grade As Integer)Select Case gradeCase 1 To 3Debug.Print "Ваша оценка: Недостаточно"Case 4 To 6Debug.Print "Ваша оценка: Удовлетворительно"Case 7 To 8Debug.Print "Ваша оценка: Хорошо"Case 9 To 10Debug.Print "Ваша оценка: Отлично"Case ElseDebug.Print "Некорректная оценка"End SelectEnd Sub
Function GetDiscountCode(customerType As String) As StringDim discountCode As StringSelect Case customerTypeCase "Regular"discountCode = "REG10"Case "Premium"discountCode = "PREM20"Case "VIP"discountCode = "VIP30"Case ElsediscountCode = "NOCODE"End SelectGetDiscountCode = discountCodeEnd Function

Die Case Select Else-Anweisung ist ein wichtiges Werkzeug in Excel VBA, mit dem Sie den Code kompakter und lesbarer gestalten können, wenn Sie mit vielen Bedingungen arbeiten.