Usar instrucciones Select CaseUsing Select Case statements

Use la instrucción Select Case como alternativa al uso de ElseIf en Si... A continuación... Else instrucciones al comparar una expresión con varios valores diferentes.Use the Select Case statement as an alternative to using ElseIf in If...Then...Else statements when comparing one expression to several different values. Mientras las instrucciones If...Then...Else pueden evaluar una expresión diferente para cada instrucción ElseIf, la instrucción Select Case evalúa una expresión solo una vez, en la parte superior de la estructura de control.While If...Then...Else statements can evaluate a different expression for each ElseIf statement, the Select Case statement evaluates an expression only once, at the top of the control structure.

En el siguiente ejemplo, la instrucción Select Case evalúa el argumento que se pasa al procedimiento.In the following example, the Select Case statement evaluates the argument that is passed to the procedure. Tenga en cuenta que cada instrucción Case puede contener más de un valor, un intervalo de valores o una combinación de valores y operadores de comparación.Note that each Case statement can contain more than one value, a range of values, or a combination of values and comparison operators. La instrucción Case Else opcional se ejecuta si la instrucción Select Case no coincide con un valor de alguna de las instrucciones Case.The optional Case Else statement runs if the Select Case statement doesn't match a value in any of the Case statements.

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 

Vea tambiénSee also

Soporte técnico y comentariosSupport and feedback

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación?Have questions or feedback about Office VBA or this documentation? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.