Como usar a função Choose no VBA?

A função `Choose` no VBA (Visual Basic for Applications) é usada para selecionar e retornar um valor de uma lista de argumentos, com base em um índice especificado. Essa função é útil para simplificar a seleção de opções ou para substituir uma estrutura `Select Case` simples. A sintaxe da função é a seguinte:

Choose(index, choice-1, choice-2, ..., choice-n)

`index`: Um valor numérico que determina qual argumento na lista será retornado. Esse número começa em 1. Se `index` for menor que 1 ou maior que o número de opções, a função `Choose` retornará `Null`.
`choice-1, choice-2, …, choice-n`: Uma lista de expressões, das quais uma será escolhida e retornada pela função, dependendo do índice.

Aqui está um exemplo de como usar a função `Choose`:

Sub ExemploChoose()
    Dim diaDaSemana As Integer
    Dim nomeDoDia As String
    
    ' Suponha que o dia da semana seja passado como um número de 1 (Domingo) a 7 (Sábado)
    diaDaSemana = 3 ' Por exemplo, terça-feira
    
    ' Usando a função Choose para determinar o nome do dia da semana
    nomeDoDia = Choose(diaDaSemana, "Domingo", "Segunda-feira", "Terça-feira", "Quarta-feira", _
                       "Quinta-feira", "Sexta-feira", "Sábado")
    
    ' Exibe o nome do dia da semana
    MsgBox "O dia da semana é: " & nomeDoDia
End Sub

Neste exemplo, quando `diaDaSemana` é 3, a função `Choose` retorna “Terça-feira”. Se o valor de `diaDaSemana` fosse 5, a função retornaria “Quinta-feira”.

Considerações:

Certifique-se de que o índice esteja dentro do intervalo válido que corresponda ao número de opções que você passou para a função `Choose`.
Se o índice for inválido, a função retorna `Null`, o que pode causar erros se não for tratado adequadamente.
`Choose` pode ser usada para selecionar entre diversos tipos de dados, não apenas strings.

facebooklinkedin