Instrução If Then do Excel VBA - Macros fáceis do Excel

Índice

Instrução If Then | Outra declaração

Use o Declaração If Then em Excel VBA para executar linhas de código se uma condição específica for atendida.

Declaração If Then

Coloque um botão de comando em sua planilha e adicione as seguintes linhas de código:

Dim score As Integer, result As String
pontuação = intervalo ("A1"). Valor
Se pontuação> = 60 Então resultado = "passar"
Intervalo ("B1"). Valor = resultado

Explicação: se a pontuação for maior ou igual a 60, o Excel VBA retorna aprovado.

Resultado quando você clica no botão de comando na planilha:

Nota: se a pontuação for inferior a 60, o Excel VBA coloca o valor do resultado da variável vazia na célula B1.

Outra declaração

Coloque um botão de comando em sua planilha e adicione as seguintes linhas de código:

Dim score As Integer, result As String
pontuação = intervalo ("A1"). Valor
Se pontuação> = 60 Então
resultado = "passar"
Outro
resultado = "falha"
Fim se
Intervalo ("B1"). Valor = resultado

Explicação: se a pontuação for maior ou igual a 60, o Excel VBA retorna aprovado, caso contrário, o Excel VBA retorna falha.

Resultado quando você clica no botão de comando na planilha:

Observação: somente se você tiver uma linha de código após Then e nenhuma instrução Else, é permitido colocar uma linha de código diretamente após Then e omitir (omitir) End If (primeiro exemplo). Caso contrário, inicie uma nova linha após as palavras Then e Else e termine com End If (segundo exemplo).

Você vai ajudar o desenvolvimento do site, compartilhando a página com seus amigos

wave wave wave wave wave