A função VBA Choose retorna um valor de sua lista de argumentos com um determinado número.
Choose(número, valor_1, valor_2, valor_3, etc.)
Exibição de um dos 3 valores pelo número escrito na variável "choice":
Sub ChooseExample1() choice = 1 course = Choose(choice, "Excel", "VBA", "Google Sheets") MsgBox "Curso selecionado:" & course 'Retorna a mensagem: "Curso selecionado: Excel" End Sub
Uma alternativa para a função Choose é usar um array (Array):
Sub ChooseExample2() choice = 1 course = Array("Excel", "VBA", "Google Sheets")(choice) MsgBox "Curso selecionado:" & course 'Retorna a mensagem: "Curso selecionado: VBA" End Sub