Ошибка выполнения 424: требуется объект в Excel VBA

Question

У меня есть код, где я пытаюсь получить данные между двумя датами

If qDateStart.Text <> "" Then
    If qConsignor.Text <> "" Or qSource.Text <> "" Or qDestination.Text <> "" Or qTransaction.Text <> "" Then
        strSQL = strSQL & " AND [Date]=BETWEEN '" & qDateStart.Text & "' AND '" & qDateEnd.Text & "'"
    Else
        strSQL = strSQL & " [Date]=BETWEEN '" & qDateStart.Text & "' AND '" & qDateEnd.Text & "'"
    End If
End If

но когда я пытаюсь его запустить, я только что получил Runtime Error 424, требуется объект.