Фильтр в подчиненной форме

Есть MS Access 97.
Есть форма основная и подчиненная.
Если открыть саму подчиненную форму (отдельно от основной), то по правому клику мыши выскакивает меню, в котором в том числе есть стандартные пункты по фильтру: Фильтр по выделенному,...
Если же открыть основную форму, то на подчиненной форме эта часть меню недоступна ("засерена"). Хотя, например, сортировка разрешена.
Как заставить работать эти пункты меню?

Заранее благодарен

Из хелпа:
Событие Применение фильтра (ApplyFilter) не возникает при выполнении пользователем одного из следующих действий.

· Применение или удаление фильтра с помощью макрокоманд ПрименитьФильтр (ApplyFilter), ОткрытьФорму (OpenForm) или ПоказатьВсеЗаписи (ShowAllRecords) в макросе или соответствующих им методов объекта DoCmd в программе Visual Basic.
· Закрытие окна расширенного фильтра или окна обычного фильтра с помощью макрокоманды Закрыть (Close) или метода Close объекта DoCmd.

· Задание значений свойств Фильтр (Filter) или Фильтр включен (FilterOn) в макросе или в программе Visual Basic (хотя задание значений этих свойств в макросе или в процедуре обработки события Применение фильтра (ApplyFilter) допускается).

mds_world

Из хелпа:...

Спасибо за ответ.
Но данные методы НЕ использую при открытии форм.
Какие еще есть версии???

Как после этой команды снять все фильтры? тоже кнопкой.

Private Sub Command25_Click()
Screen.PreviousControl.SetFocus
DoCmd.RunCommand acCmdFilterBySelection
End Sub

DoCmd.ShowAllRecords

Эта команда перебрасывает на превую запись

DoCmd.ShowAllRecords

а как этого избежать?

ByKiS

Эта команда перебрасывает на превую запись а как этого избежать?

Karfaqen

Этого не избежать. Но можно перед этим запомнить значение ключ текущей записи, а после этого позиционироваться по данному значению.

А можете пример написать?

например

Dim key$: key = "полеКода"
Dim id&: id = Me(key)
DoCmd.ShowAllRecords
Me.Recordset.FindFirst key & "=" & id