доступ к vba docmd.applyfilter для дат - PullRequest
Новая
       8

доступ к vba docmd.applyfilter для дат

0 голосов
/ 05 марта 2019

Я использую код, основанный на номере недели, чтобы отфильтровать по датам рабочих заданий, которые соответствуют столбцу недели и больше столбца 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

1 Ответ

1 голос
/ 05 марта 2019

Вы пропускаете y , и разделители даты должны быть экранированы: 

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