Usando as instruções Caso escolha

Utilize a instrução Selecionar Caso como alternativa à utilização de ElseIf em Se... Em seguida,... Instruções else ao comparar uma expressão com vários valores diferentes. Enquanto Se... Em seguida,... As instruções Else podem avaliar uma expressão diferente para cada instrução ElseIf , a instrução Select Case avalia uma expressão apenas uma vez, na parte superior da estrutura de controlo.

No exemplo seguinte, a instrução Selecionar Caso avalia o argumento que é transmitido ao procedimento. Tenha em atenção que cada instrução Case pode conter mais do que um valor, um intervalo de valores ou uma combinação de valores e operadores de comparação. A instrução Case Else opcional é 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.