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