possibly:
At the beginning of the procedure add this:

On Error GoTo ErrorExit

Then insert this as the lines before "End" Sub or Function:

ErrorExit:
Err.Clear

-OR-
You could use On Error Resume Next at the beginning, to suppress any error
messages that may occur in the procedure.

I hope this helps!
GS