Question

我正在运行一个基于周号的代码，以过滤匹配周列且大于WODate列的工单日期。我的代码为第二个applyfilter命令提供了“语法”错误。是否可以同时应用两个过滤器？我的代码：

Private Sub Weeks_AfterUpdate()

    DoCmd.ApplyFilter , "[Week] = '" & Me.Weeks & "'"
    DoCmd.ApplyFilter , "[WODate] >= #" & Format(wodate, "mm/dd/yyy") & "# and [FYDate] <= #" & Format(todate, "mm/dd/yyyy") & "#"

    Me.FilterOn = True


End Sub

Answer 1

您错过了 y ，并且应该使用日期分隔符：

DoCmd.ApplyFilter , "[WODate] >= #" & Format(wodate, "mm\/dd\/yyyy") & "# and [FYDate] <= #" & Format(todate, "mm\/dd\/yyyy") & "#"

访问vba docmd.applyfilter获取日期

1 个答案: