VBA - If Elseif - Else declaração

Uma instrução If seguida por uma ou mais instruções ElseIf que consiste em expressões booleanas e, em seguida, seguida por uma instrução else padrão, que é executada quando todas as condições se tornam falsas.

Sintaxe

A seguir está a sintaxe de uma instrução If Elseif - Else em VBScript.

If(boolean_expression) Then
   Statement 1
   .....
   .....
   Statement n
ElseIf (boolean_expression) Then
   Statement 1
   .....
   ....
   Statement n
ElseIf (boolean_expression) Then
   Statement 1
   .....
   ....
   Statement n
Else
   Statement 1
   .....
   ....
   Statement n
End If

Diagrama de fluxo

Exemplo

Para fins de demonstração, vamos encontrar o maior entre os dois números de um Excel com a ajuda de uma função.

Private Sub if_demo_Click()
   Dim x As Integer
   Dim y As Integer
    
   x = 234
   y = 234
    
   If x > y Then
      MsgBox "X is Greater than Y"
   ElseIf y > x Then
      Msgbox "Y is Greater than X"
   Else
      Msgbox "X and Y are EQUAL"
   End If
End Sub

Quando o código acima é executado, ele produz o seguinte resultado.

X and Y are EQUAL