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).