如何解除"Project - VBA Project"窗格?



此宏将隐藏/关闭 VBE 主窗口:

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

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

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

您可以使用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 

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

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

最新更新