Um programa de computador bem escrito pode economizar tempo para o desenvolvedor e os programadores que mantê-lo no futuro. No VBA , você pode usar a instrução Select Case como uma alternativa ao uso " ElseIf " em " If ... Then ... Else " declarações . Um programa torna-se difícil de ler quando você tem muitos " If ... Then ... Else " declarações e também pode ficar mais lento do que se você usar Select Case . A instrução Select Case avalia a expressão apenas uma vez , enquanto o " If ... Else ... then" precisa avaliar cada passo antes de executar o código . Instruções
1

Clique na guia "Desenvolvedor" , clique em " Visual Basic ", e clique no menu "Inserir" . Clique em " Module" para inserir um novo módulo de código
2

Comece criando um procedimento sub usando o seguinte código : .

Private Sub CaseSwitch ()

3

Crie três variáveis ​​, digitando as seguintes linhas de código :

Dim employeePerf as Integer Dim

salário como moeda

Dim Bonus como moeda

4

Definir valores para o salário e variáveis ​​employeePerf :

salário = 75000

employeePerf = 3
5

Use a instrução de seleção caso a determinar a quantidade de bônus com base no desempenho do empregado e seu salário base.

Select Case employeePerf

Caso 1

Bonus = salário * 0,1

caso 2 , 3

Bonus = salário * 0.09

caso 4 a 6

Bonus = salário * 0.07
caso

Is> 8

Bonus = Caso 100

Else

Bonus = 0

End Select
6

Mostrar o valor do bônus usando a janela Immediate.

Debug.Print Bonus
7

terminar o procedimento digitando " End Sub ". Pressione " F5 " para executar o código.