I don't have a big enough table to test the status bar but what about
Code:
On Error GoTo errHandler
DoCmd.SetWarnings False
Status_Message_Open True, "Creating Heat Map... Running Query"
Application.Echo False " "
' run make table query
DoCmd.OpenQuery "9d 2c7b) Heat Map"
exitHere:
DoCmd.SetWarnings True
Status_Message_Open True, " "
Application.Echo True " "
Exit Sub/Function
errHandler:
handle errors with message box here
Resume exitHere
End Sub/Function
I presume Status_Message_Open is a UDF call (user defined function). You'd have to employ an error handler and to be almost certain that warnings and echo won't be left turned off if the code fails. I'd never turn off warnings without it. Even then, I mostly use .Execute method.
The more we hear silence, the more we begin to think about our value in this universe.
Paraphrase of Professor Brian Cox.