Enter - " " |
m_zak_list_find = Trim(UCase(Me.6)) DoCmd.GoToControl ("39") SendKeys "%{DOWN}"
SELECT ___find.key_z, ___find.txt, ___find.findtxt FROM ___find WHERE (((___find.findtxt) Like '*' & get_m_zak_list_find() & '*'));
Me.39 .Requery
Set rst = Forms![__main]![__].Form.RecordsetClone rst.FindFirst "[key_z] = " & CStr(ko) If Not rst.EOF Then Forms![__main]![__].Form.Bookmark = rst.Bookmark