我想筛选指定工作日期,存在问题包含挂挡的记录,请问怎样修改?
Dim Filter As String
With e.Form.Controls("工作日期查找")
If .Value IsNot Nothing Then
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "工作日期 = #" & .Value & "#"
End If
End With
Tables("表1").Filter = "[存在问题] Like '%挂挡%' Or [存在问题] Like '挂挡%' Or[存在问题] Like '%挂挡'