| |
|
|
| | Есть ленточная форма с данными... в заголовке хочу сделать три поля по которым нужно фильтровать значения в этой форме (фамилия, имя, отчество)... Как применить фильтр по одному значению нашел в форуме
rivate Sub ClientForFilter_Change()
Dim strFind As String
strFind = Nz(Me.ClientForFilter.Text, "")
If strFind <> "" Then
Me.Filter = "[Название] Like '" & strFind & "*'"
Me.FilterOn = True
Me.ClientForFilter.SelStart = 200
Else
Me.FilterOn = False
End If
End Sub
А как ее переделать на поиск по трем параметрам? | |
| |
| |
| |
 20 Кб. |
|
| | А такой пример подойдет?
Его уже тут кто-то когда-то кому-то выставлял.  | |
| |
| |
| |
16 Кб. |
|
| | Помогите к моей базе применить предыдущий пример!!! 
Что означает idField в коде
Private Sub П1_Change()
strFiltr = Me.П1.Text
Set idField = Me.П1
Call fFilForm(strFiltr, strSQL, strSql1, Me.Subfrm.Form, "Обозначение")
End Sub | |
| |
| |
| |
|
|
| | Сегодня уже убегаю. Завтра посмотрю ваш пример. | |
| |
| |
| |
|
|
| | Ваш пример вполне рабочий. Просто проставьте правильное название полей.
У вас, например , поле с именем - это поле31, а вы обрабатываете событие Поле26.
Естественно, оно работать не будет.
И т.д. по всем полям. | |
| |
| |
