Hallo zusammen
ich brauch häufig die Access Suchfunktion und starte sie aus einem Formular heraus mit der üblichen VBA Routine:
Private Sub SuchTask_Click()
On Error GoTo Err_SuchTask_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70...