DoCmd.OutputTo Error Leaves Outputting Object in Status Bar

[HardingR2000]

Platform: Access 2002

I am running the DoCmd.OutputTo command to create a spreadsheet. The spreadsheet already exists and is currently active on my PC. This causes an error 2302 which I trap and give the user (me) a message and then exit normally. Unfortunately the the Outputting Object and progression bar are left on the Status Bar in the lower left corner of the Access application's window.

I have tried running the SysCmd(acSysCmdClearStatus) several times but the message will not go away. I have use the SysCmd(acSysCmdSetStatus, "This is a test") which places the message "This is a test" in the Status Bar but when I run the SysCmd(acSysCmdClearStatus) my message goes away but the "Outputting Object" and progression bar are still then even if I repeatedly run the ClearStatus command.

Does any one know how to clear the status message from the Status Bar when the message is created by the DoCmd.OutputTo command?

 

[genomon]

which I trap and give the user (me) a message and then exit normally

Try adding Err.Clear before you exit.

Beir bua agus beannacht!

 

[HardingR2000]

I tried the Err.Clear and it did not help.

 

[genomon]

RATS!

Beir bua agus beannacht!