Your ideas r good, but in my case i would need som info form with text "query is running, wait pls....."
this code, is not working very well cos it appears after a few sec .. when query is running....
DoCmd.OpenForm "nazov_form"
Forms![nazov_form].Visible = False
..
DoCmd.runmacro "xxx"...