/ / Excel VBA If Then Statement

Excel VBA If Then Statement

Se então declaração | Outra declaração

Use o Se então declaração em Excel VBA para executar linhas de código se uma condição específica for atendida.

Se então 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
score = Range("A1").Value

If score >= 60 Then result = "pass"

Range("B1").Value = result

Explicação: se a pontuação for maior ou igual a 60, o Excel VBA retornará passagem.

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

Excel VBA If Then Statement

Nota: se a pontuação for menor que 60, o Excel VBA colocará 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
score = Range("A1").Value

If score >= 60 Then
    result = "pass"
Else
    result = "fail"
End If

Range("B1").Value = result

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

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

Declaração do Excel VBA Else

Nota: 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 (deixar de fora) 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).

Leia também: