Sub ifTest4()
Dim intNum As Integer
intNum = 12
If intNum = 1 Then
Debug.Print "This is the lowest number"
ElseIf intNum = 15 Then
Debug.Print "This is the highest number"
Else
Debug.Print "The number is between 1 and 15"
End If
End Sub