Macro Debugging

[#1]

I have a macro firing and want to write out some debugging or logging when it runs.  Does anyone know if there is a command that will write a line to the qv log files?  Or what would you suggest?  This job runs while I am not watching and I need too write some things out to see why its not completing. 

[#2]

I use this to write to the windows application event log

Sub WriteToLog(strText)

          set objShell = createobject("WScript.Shell")

          objShell.LogEvent 4, strText

End Sub

[#3]

Cool.  Do you know if I can catch any error then write it out to the log with the above.  I think that would help me out a lot at this point.