visual-studio-2008 - 用于格式化解决方案中所有文件的 Visual Studio 宏

Question

我最近为我的代码确定了一种新的格式样式，并想替换现有的代码。唯一的问题是我的解决方案中有 100 个文件，如果不是 1000 个，我不想单独格式化每个文件。

我想知道如何创建一个宏来打开解决方案中具有 .cs 文件扩展名的每个文件，只需选择所有文本，然后剪切并粘贴它(这将相应地格式化它)。如果它也可以对 using 语句进行排序和删除也很棒，但这并不重要，因为我认为这会更难一些。

我很感激你的帮助。谢谢

Answer 1

问题解决了!以下宏可以解决任何人感兴趣的问题:

   Public Module FormatAll
        Public Sub FormatAll()
            Dim sol As Solution = DTE.Solution
            For i As Integer = 1 To sol.Projects.Count
                Dim proj As Project = sol.Projects.Item(i)
                For j As Integer = 1 To proj.ProjectItems.Count
                    FormatSome(proj.ProjectItems.Item(j))
                Next
            Next
        End Sub

        Private Sub FormatSome(ByVal projectItem As ProjectItem)
            If projectItem.Kind = Constants.vsProjectItemKindPhysicalFile Then
                If projectItem.Name.LastIndexOf(".cs") = projectItem.Name.Length - 3 Then
                    Dim window As Window = projectItem.Open(Constants.vsViewKindCode)
                    window.Activate()
                    projectItem.Document.DTE.ExecuteCommand("Edit.FormatDocument")
                    projectItem.Document.DTE.ExecuteCommand("Edit.RemoveAndSort")
                    window.Close(vsSaveChanges.vsSaveChangesYes)
                End If
            End If

            For i As Integer = 1 To projectItem.ProjectItems.Count
                FormatSome(projectItem.ProjectItems.Item(i))
            Next
        End Sub
    End Module