在VBA中使用变量作为过滤条件

Question

我试图在使用VBA的日期之前进行过滤，我记录了一个宏作为添加变量的基础。

SDatesel是含有的串联的可变"<" ＆SDATE SDate是由用户在销售的AC定义的开始日期"Base Sheet"标签

sDate = Worksheets("Base Sheet".Range("A2")

字符串很好，因为在调试模式下它们正确显示

它在线上摔倒了

Inspections.Range("A:S").AutoFilter Field:=3, Criertia1= _

   sDateSel, Operator:=xlAnd

Dim sDate As Date
Dim eDate As Date

sDate = Worksheets("Base Sheet").Range("A2")
eDate = Worksheets("Base Sheet").Range("C2")

Dim sDateSel As String
Dim eDateSel As String
'Dim Qot As String

sDateSel = "<" & sDate
eDateSel = ">" & eDate

Inspections.Range("$A:$S").AutoFilter Field:=3, Criteria1:= _
    sDateSel, Operator:=xlAnd
Rows("2:2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Delete Shift:=xlUp
Range("C1").Select
Inspections.Range("$A:$S").AutoFilter Field:=3, Criteria1:= _
    eDateSel, Operator:=xlAnd
Rows("2:2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Delete Shift:=xlUp
Selection.AutoFilter

我得到的错误是424 - 需要对象

我相信这是由于使用了变量，因为当原始数据中的sDateSel或eDateSel像"<20/05/2019"