|
|
|
| Dim sert As String
Dim sert2 As String
sert = "2"
sert2 = "неявка"
If Me!Флажок36 Then
ФильтрСерт = "Сертификат = " & sert & " or Сертификат = " & sert2
ОбновитьТаблицу
Else
ФильтрСерт = ""
ОбновитьТаблицу
End If
Поле Сертификат текстовое | |
|
| |
|
|
|
| А какая ошибка?
А это что? ФильтрСерт = "Сертификат = " & sert & " or Сертификат = " & sert2 | |
|
| |
|
|
|
| те записи, где в поле Сертификат стоит либо "2" либо "неявка"
вот на это и ругается | |
|
| |
|
|
|
|
Dim sert As String
Dim sert2 As String
sert = "2"
sert2 = "неявка"
If Me!Флажок36 Then
ФильтрСерт = "Сертификат = '" & sert & "' or Сертификат = '" & sert2 & "'"
Else
ФильтрСерт = ""
End If
ОбновитьТаблицу
|
| |
|
| |
|