Cómo utilizar un interruptor de la caja de VBA Excel

Un programa de ordenador bien escrito puede ahorrar tiempo a los desarrolladores y los programadores que mantienen en el futuro . En VBA se puede utilizar la instrucción Select Case como alternativa a la utilización de " ElseIf " en las declaraciones " If ... Then ... Else " . Un programa se convierte en difícil de leer cuando se tiene muchos " If ... Then ... Else " declaraciones y también puede funcionar más lento que si se utiliza Select Case . Una instrucción Select Case evalúa la expresión de una sola vez , mientras que el " if ... else ... Then" declaraciones deben evaluar cada paso antes de ejecutar el código . Instrucciones
1

clic en la pestaña " desarrolladores" , haga clic en "Visual Basic ", y haga clic en el menú " Insertar". Haga clic en " módulos" para insertar un nuevo módulo de código
2

Comience por crear un procedimiento sub usando el siguiente código : .

Private Sub CaseSwitch ()

3

Crear tres variables escribiendo las siguientes líneas de código:

employeePerf Dim As Integer

salario dévil como moneda

Bonus dévil como moneda
Página 4

Defina valores para el salario y las variables employeePerf :

salariales = 75000

employeePerf = 3
5

Utilice la instrucción select caso a determinar el monto del bono basado en el desempeño del empleado y su salario base.

Select Case employeePerf

caso 1

bonus = salario * 0.1 GBP

caso 2 , 3

Bonus = sueldo * 0.09

caso 4 a 6 personas

Bonus = sueldo * 0.07

caso es > 8

bonus = 100

Case Else

bonus = 0

End Select
6

Muestra la cantidad de la prima mediante la ventana Inmediato.

Debug.Print Bonus
7

Fin del procedimiento escribiendo " End Sub ". Pulse la tecla "F5 " para ejecutar el código.