Как установить фокус на любом объекте в MS Access с помощью VBA

Question

Как кто-то может установить фокус открытого объекта Query в MS Access, используя VBA?

Я делаю что-то вроде этого ...

 If Application.CurrentData.AllQueries(myqueryname).IsLoaded = True Then
      'set the focus

      ' Export to office links for analysis
      CommandBars("Menu Bar").Controls("Tools").Controls("Office Links").Controls("Analyze It With Microsoft Office Excel").accDoDefaultAction

Answer 1

опять docmd твой друг: -)

'set the focus
DoCmd.SelectObject acQuery, myqueryname, False