Uso de Select Case en VBA

La selección de casos, o Select-Case, nos permite tomar decisiones basadas en el valor de una variable. Como puedes imaginar, es una alternativa al condicional If Else, y en determinadas situaciones puede resultar más adecuada.

La estructura Select Case se encarga de dirigir el flujo de información en nuestra macro según el valor de la variable seleccionadora. Esta selección resulta en la ejecución de acciones específicas, como se muestra en el siguiente esquema.

La variable seleccionadora puede ser de cualquier tipo. Una de las diferencias más importantes entre Select Case y el condicional If Else es que la evaluación se realiza directamente sobre el resultado de una variable, lo que significa que no podemos utilizar operadores lógicos (And/Or) en esta evaluación.

Estructura del Select Case en VBA

La estructura básica del Select Case es la siguiente:

Select Case Variable
    Case Resultado que tomaría la variable
        Acciones
End Select

Ejemplo de Select Case en VBA

Si deseamos aplicar un color específico a las celdas según el resultado de la evaluación “Approved” o “Disapproved”, podríamos usar la siguiente rutina:

i = 1
Do Until Cells(i, 1) = ""
  Select Case Cells(i, 1)
    Case "Approved"
      Cells(i, 1).Interior.Color = RGB(0, 255, 0) ' Verde
    Case "Disapproved"
      Cells(i, 1).Interior.Color = RGB(255, 0, 0) ' Rojo
  End Select
  i = i + 1
Loop

Con esta rutina, las celdas que contengan la palabra “Approved” se pintarán de verde, mientras que las que contengan “Disapproved” tendrán color rojo.

Con la práctica, irás adquiriendo destrezas que te permitirán escribir un código de programación más compacto y menos propenso a errores.

¿Te gustaría saber más? Contáctanos para obtener más información.