Вы можете использовать Application.VBE.Windows("WindowName").Close
, чтобы закрыть соответствующее окно VBE.
См. Это
Option Explicit
Sub Sample()
Dim i As Long
For i = 1 To Application.VBE.Windows.Count
Debug.Print Application.VBE.Windows(i).Caption
Next i
End Sub
Это даст вам что-то подобное в Immediate Window
Module1 (Code)
Book1 - Sheet1 (Code)
Project - VBAProject
Properties - Module1
Object Browser
Watches
Locals
Immediate
Так
Application.VBE.Windows("Immediate").Close
закроет окно «Немедленно». Точно так же, чтобы ответить на ваш вопрос
Application.VBE.Windows("Project - VBAProject").Close
закроет панель «Project - VBA Project». И чтобы показать это снова, вы можете использовать
Application.VBE.Windows("Project - VBAProject").Visible = True