Функция VBA Choose возвращает значение из списка аргументов с заданным числом.
Choose(число, значение_1, значение_2, значение_3 и т.д.)
Отображение одного из 3-х значений по номеру, который прописан в переменной "choice":
Sub ChooseExample1()
choice = 1
course = Choose(choice, "Excel", "VBA", "Google Sheets")
MsgBox "Избранный курс: " & course 'Возвращает сообщение: "Избранный курс: Excel"
End Sub
Альтернативой функции Choose является использование массива (Array):
Sub ChooseExample2()
choice = 1
course = Array("Excel", "VBA", "Google Sheets")(choice)
MsgBox "Избранный курс: " & course 'Возвращает сообщение: "Избранный курс: VBA"
End Sub