La función VBA Choose devuelve un valor de su lista de argumentos con un número determinado.
Choose(número, valor_1, valor_2, valor_3, etc.)
Visualización de uno de los 3 valores por el número escrito en la variable "elección":
Sub ChooseExample1()
choice = 1
course = Choose(choice, "Excel", "VBA", "Google Sheets")
MsgBox "Curso seleccionado:" & course 'Devuelve el mensaje: "Curso seleccionado: Excel"
End Sub
Una alternativa a la función Choose es usar una matriz (Array):
Sub ChooseExample2()
choice = 1
course = Array("Excel", "VBA", "Google Sheets")(choice)
MsgBox "Curso seleccionado:" & course 'Devuelve el mensaje: "Curso seleccionado: VBA"
End Sub