If...Then...ElseIf Statement
Sub elseIfDemo() Dim myNumber As Integer myNumber = 5 If myNumber = 0 Then MsgBox "You entered zero." ElseIf myNumber > 0 Then MsgBox "You entered a positive number." ElseIf myNumber < 0 Then MsgBox "You entered a negative number." End If End Sub