Как настроить фокус на любом объекте в 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