How to apply two conditions in the same If statement?

Question

Public Sub master()
    Dim checker As Date

    checker = Time
    If (checker > TimeValue("09:15:00")) & (checker <= TimeValue("12:00:00")) Then
        MsgBox "On time"
    Else
        MsgBox "Not the right time"
    End If

End Sub

It is giving an error on the if statement

"Type Mismatch" Run Time error 13

I have also tried Now, checker = Now

Although, should be closed as typo! – Vega Aug 19 '21 at 07:02 — Vega, Aug 19 '21 at 07:02

score 0 · Accepted Answer · answered Feb 20 '21 at 20:30

0

In VBA the & operator is for string concatenation. You need to use "and":

 If (checker > TimeValue("09:15:00")) and (checker <= TimeValue("12:00:00")) Then

answered Feb 20 '21 at 20:30

razcor

355
2
11

How to apply two conditions in the same If statement?

1 Answers1