Chris Rae's VBA Pages

Routine Archive

Routine:	DeleteTextInDebugWindow1
Description:	One way to clear all the text in the Immediate window. I really can't take the credit because Cindy Meister wrote it. If you have difficulty getting it to work (SendKeys is always awkward) then try DeleteTextInDebugWindow2().

Sub DeleteTextInDebugWindow1()
    ' Chris Rae's VBA Code Archive - http://chrisrae.com/vba
    Application.VBE.Windows("Immediate").SetFocus
    DoEvents
    SendKeys "^a{Delete}", True
    DoEvents
End Sub

You're free to use these routines for anything you want - all I ask is that for commercial use you give me credit somewhere. You may instead want to head back to the index for my Visual Basic for Applications Pages or the main routines archive page.