Close all code windows/panes in VB Editor

[Brian.Crawford]

Whenever I open the VB Editor all the code windows for (almost) all my add-ins and personal WB always open and totally clutter-up my current project. Is there a way to automatically close them ALL (I'd individually re-open the current project ones I need to work with) at once when the VBE opens or a macro I could run to close them at least until Excel closes.
Have done some searching on this but to no avail.

thanks all
Brian

 

[RudiS]

Could try something like this;
I am not familiar with coding in the VBE, but this seems to close all but one.

Sub CloseCodePanes()
Dim i As Integer
    On Error Resume Next
    For i = Application.VBE.CodePanes.Count To 1 Step -1
        Application.VBE.CodePanes(i).Window.Close
    Next i
End Sub

 

[Brian.Crawford]

Well, one is better than 100.
Interestingly though, when I ran it with many windows open it did leave one open, however when I ran it with just a few (4) it got rid of all of them.
Appreciate this a lot .. I've put up with this for so many years, just never took the time to find a solution.

Any thoughts on how I could trigger it automatically when the VBE opens
thanks again
Brian

 

[RudiS]

I had to ask your question in the forum I frequent in as I needed to get advice regarding triggering the macro automatically.

See the replies from Hans (our resident guru and Admin) at Eileen's Lounge, here for some good suggestion...