Funktion VBA: Choose

Beschreibung

Die Funktion VBA Choose gibt einen Wert aus ihrer Argumentliste mit einer bestimmten Zahl zurück.

Syntax Choose

Choose(Zahl, Wert_1, Wert_2, Wert_3 usw.)

Beispiel VBA Choose

Anzeige eines von 3 Werten anhand der in der Variablen „choice“ geschriebenen Zahl:

Sub ChooseExample1()
    
     choice = 1
    
     course = Choose(choice, "Excel", "VBA", "Google Sheets")
    
     MsgBox "Ausgewählter Kurs:" & course 'Gibt die Meldung zurück: „Ausgewählter Kurs: Excel“
    
End Sub

Eine Alternative zur Funktion Choose ist die Verwendung eines Arrays (Array):

Sub ChooseExample2()
    
     choice = 1
    
     course = Array("Excel", "VBA", "Google Sheets")(choice)
    
     MsgBox "Ausgewählter Kurs:" & course 'Gibt die Meldung zurück: „Ausgewählter Kurs: VBA“
    
End Sub