Поиск в другой форме поля, удовлетворяющего критерию поиска (MSA 2000) Метод Like Private Sub cmdFind() Dim strCriteria As String strCriteria = "LIKE ""*" & FindStr & "*""" DoCmd.OpenForm "Conntent", _ WhereCondition:="[Field] " & strCriteria End Sub В данном примере поиск в поле "Field" формы "Conntent" по значению поля "FindStr" !!!В форме поиска надо создать стринговое поле "FindStr" Форму "Conntent" лучше сделать ленточной или табличной