如何禁用 "Project - VBA Project" 面板?

How to disabe the "Project - VBA Project" pane?

此宏将 hide/close VBE Main Window:

Sub VBEMainWindowHide()
    'close VBE window:
    Application.VBE.Window.Visible = False
End Sub

我正在尝试关闭或隐藏 "Project - VBA Project" 窗格。此窗格显示工作簿中的所有工作表、ThisWorkbook 模块等

我尝试了 Application.VBE.Projects.Visible = FalseApplication.VBE.("Projects - VBA Project") 以及使用相同术语的一两个其他组合。

您可以使用Application.VBE.Windows("WindowName").Close关闭相关VBE Window。

看到这个

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 

将关闭即时 window。同样回答你的问题

Application.VBE.Windows("Project - VBAProject").Close 

将关闭 "Project - VBA Project" 窗格。要再次显示,您可以使用

Application.VBE.Windows("Project - VBAProject").Visible = True