Фильтрация другой формы на основе фиксированного значения

Question

Проблемы с приведенным ниже кодом, когда я пытаюсь добавить 2-е условие, которое ищет фиксированную текстовую строку в поле Статус. Ошибка 2465 "Не удается найти поле 'l1', указанное в вашем выражении.

Private Sub Work_In_Progress_Click()
    Dim strFilter As String
    strFilter = "[Category] =" & Chr(39) & Me.Category.value & Chr(39) And [Status] = "work In Progress"
    Forms("f_ADb_Changes").Filter = strFilter
    Forms("f_ADb_Changes").FilterOn = True
End Sub

Answer 1

1. And - это буквальный текст, который должен находиться между кавычками и объединяться в переменные

2. текстовый параметр work In Progress требует разделителей апострофов

3. апострофы для параметра Category в порядке, при условии, что Category также является текстовым полем

4. с использованием .Value допустимо, но не нужно, поскольку это свойство по умолчанию для элементов управления данными

5. может просто набрать апостроф внутри литеральной строки вместо конкатенации Chr(39)

    strFilter = "[Category] ='" & Me.Category & "' And [Status] = 'work In Progress'"