Funkcja VBA Choose zwraca wartość ze swojej listy argumentów o podanej liczbie.
Choose(liczba, wartość_1, wartość_2, wartość_3 itd.)
Wyświetlanie jednej z 3 wartości przez liczbę zapisaną w zmiennej „choice”:
Sub ChooseExample1()
choice = 1
course = Choose(choice, "Excel", "VBA", "Google Sheets")
MsgBox "Wybrany kurs:" & course 'Zwroty wiadomość: „Wybrany kurs: Excel”
End Sub
Alternatywą dla funkcji Choose jest użycie tablicy (Array):
Sub ChooseExample2()
choice = 1
course = Array("Excel", "VBA", "Google Sheets")(choice)
MsgBox "Wybrany kurs:" & course 'Zwroty wiadomość: „Wybrany kurs: VBA”
End Sub