Access VBA: Select Case

Neben der If…Then-Bedingung gibt es noch eine weitere Bedingung unter Access VBA. Diese heißt Select Case und sie bietet in vielen Fällen eine praktische Alternative zur If…Then-Bedingung. Das gilt insbesondere, wenn auf der einen Seite des Vergleichsausdrucks immer die gleiche Variable oder der gleiche Wert steht, der mit anderen Werten verglichen werden soll. Auf den folgenden Seiten stellen wir die Select Case-Verzweigung mit allen Varianten und Möglichkeiten vor.

Beispieldatenbank

Die Beispiele dieses Artikels finden Sie in der Datenbank 2101_VBA_SelectCase.accdb.

Syntax der Select Case-Bedingung

Die Select Case-Bedingung enthält in der ersten Zeile die Schlüsselwörter Select Case sowie den ersten Teil des Vergleichs, also praktisch den Teil links vom Operator.

Abgeschlossen wird die Select Case-Bedingung von der Zeile End Select. Dazwischen befinden sich mehrere Case-Zeilen. Diese enthalten entweder einen oder mehrere Vergleichsausdrücke oder das Schlüsselwort Else. Einer jeden Case-Zeile folgen keine, eine oder mehrere Anweisungen, die ausgeführt werden, wenn die jeweilige Bedingung erfüllt ist:

Select Case 
    Case 
        
    Case 
        
    ... weitere Zweige
    Case Else
        
End Select

Dabei durchläuft die Select Case-Verzweigung die einzelnen Case-Zweige, bis einer davon die Bedingung erfüllt. Die in diesem Zweig steckenden Anweisungen werden dann ausgeführt und danach wird die Select Case-Verzweigung verlassen.

Einfaches Beispiel für die VBA Select Case-Verzweigung

Im ersten Beispiel fragt eine InputBox eine Zahl ab und trägt diese in die Variable i ein. Danach steigen wir in die Select Case-Anweisung ein. Diese verwendet die Zahl i als ersten Teil des Vergleichsausdrucks, also quasi als den Teil auf der linken Seite des Vergleichsoperators.