IF THEN ELSE

IF then statement is use to run the the certain code when given condition is true and if condition is false then some other code will execute. We have to close the IF statement with End IF.

In the below example we are asking a question by using Message box. If user clicks on Yes then we know it will return 6 and if user clicks on No then it will return 7. So we have taken condition to show the message box for the click of  yes and no.

Sub IF_else_Then()
 Dim s As Integer
 
 s = MsgBox("Do you like VBA?", vbQuestion + vbYesNo)
 
 If s = 6 Then
    MsgBox "You clicked on Yes"
 Else
   MsgBox "You clicked on No"
 End If

End Sub

When we will run this code it will show below given message.

Message Popup
Message Popup

If you click on Yes button then it will return-

Result for Yes
Result for Yes

If you click on No button then it will return-

Result for No
Result for No

ELSEIF

Elseif is used to use more than one condition. See the below given example.

Sub IF_And_ElseIF()

Dim x As Integer
 Dim y As Integer

x = VBA.InputBox("Please enter the value to x")
 y = VBA.InputBox("Please enter the value to y")

If x > y Then
 MsgBox "x is greater than y"
 ElseIf y > x Then
 MsgBox "y is greater than x"
 Else
 MsgBox "X is equal to Y"
 End If

End Sub

When we will run this code, We have to input x and y value as number.

I have given value of x as 5

Input value of x
Input value of x

I have given value of y as 10

Input value of y
Input value of y

Now it will show the result

Result popup
Result popup

Watch the IF ELSE THEN tutorial video

Next Chapter>>Select Case