Usando as instruções Caso escolha

Use a instrução Selecionar Caso como alternativa ao uso de ElseIf em If... Então... Outras instruções ao comparar uma expressão com vários valores diferentes. Enquanto se... Então... Outras instruções podem avaliar uma expressão diferente para cada instrução ElseIf , a instrução Selecionar Caso avalia uma expressão apenas uma vez, na parte superior da estrutura de controle.

No exemplo a seguir, a instrução Selecionar Caso avalia o argumento que é passado para o procedimento. Observe que cada instrução Case pode conter mais de um valor, um intervalo de valores ou uma combinação de valores e operadores de comparação. A instrução Case Else opcional será executada se a instrução Selecionar Caso não corresponder a um valor em nenhuma das instruções Case .

Function Bonus(performance, salary) 
  Select Case performance 
    Case 1 
      Bonus = salary * 0.1 
    Case 2, 3 
      Bonus = salary * 0.09 
    Case 4 To 6 
      Bonus = salary * 0.07 
    Case Is > 8 
      Bonus = 100 
    Case Else 
      Bonus = 0 
  End Select 
End Function 

Confira também

• Tópicos conceituais do Visual Basic

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.