Visual Studio 2003：启动时折叠所有项目

我有一个包含约150个项目的解决方案。当我打开解决方案时，其中一半似乎是随机打开的。我想打开所有项目崩溃的解决方案。我想在打开解决方案后仅收缩选择的一个。Visual Studio 2003：启动时折叠所有项目

我该怎么做？

2009-11-19 dotnet-practitioner

我相信IDE会保持上次打开解决方案时的展开/折叠状态。手动过程是自己关闭它们。

可选地从here。这将折叠所有项目并扩展选定的项目。

宏下面是折叠在一个解决方案中所有项目和扩大选定项目的宏：

1.Select ALT + F8你的VS2005 IDE中打开宏资源管理
2.右键单击MyMacros。
3.选择新模块。
4.将新模块名称键入为CollapseAll
5.选择确定 - 创建新模块CollapseAll。
6.右击CollapseAll模块
7.选择编辑 - 宏IDE启动。
8.复制以下Sub并将其粘贴到模块和End模块之间。 - 在宏IDE中（您可能需要调整一些行才能成功编译宏）：

Sub CollapseAll() 
'NavigateSolution() 
' Get the the Solution Explorer tree 
Dim UIHSolutionExplorer As UIHierarchy 
UIHSolutionExplorer = DTE.Windows.Item(Constants.vsext_wk_SProjectWindow).Object() 
' Check if there is any open solution 
If (UIHSolutionExplorer.UIHierarchyItems.Count = 0) 
Then 
Return 
End If 

' Get the top node (the name of the solution) 
Dim UIHSolutionRootNode As UIHierarchyItem 
Dim UIHChildItem As UIHierarchyItem 
UIHSolutionRootNode = UIHSolutionExplorer.UIHierarchyItems.Item(1) 

' Collapse each project node 
Dim UIHItem As UIHierarchyItem 
For Each UIHItem In UIHSolutionRootNode.UIHierarchyItems 
For Each UIHChildItem In UIHItem.UIHierarchyItems 
UIHChildItem.UIHierarchyItems.Expanded = False 
Next 
UIHItem.UIHierarchyItems.Expanded = False 
Next 
UIHSolutionRootNode.UIHierarchyItems.Expanded = True 

Dim UIHSelectedItem As UIHierarchyItem = UIHSolutionExplorer.SelectedItems(0) 
UIHSelectedItem.UIHierarchyItems.Expanded = True 
End Sub

保存模块。现在将此宏添加到工具栏以方便访问。

9.Select工具 - >从主菜单自定义
10.Select命令选项卡在自定义对话框
11.Select宏
12.Select的CollapseAll宏观和拖放在VS2005的一个IDE工具栏。你会看到工具栏上的宏名称 -
13.Do不关闭自定义弹出窗口 -
14.Right单击宏名称上的工具栏
15.Select默认风格 - 这将卸下宏名称工具栏上，导致在工具条
16.Right一个小矩形点击小矩形
17.Select ChangeButtonImage
18.Select的图像中的一个，例如，沙漏。你会看到工具栏上的图像。
19.Close自定义弹出
20.To测试宏：
1.Select项目的一个解决方案中的
2.Select在工具栏
3 CollapseAll按钮。观察解决方案资源管理器将全部折叠并将展开您选择的项目。