Ms word 使用宏在word中创建许多类似的宏

Ms word 使用宏在word中创建许多类似的宏,ms-word,macros,Ms Word,Macros,我正试图简化在word中创建大量几乎相同的宏的过程,并想知道是否有办法使用宏来实现这一点 我想要的是: 我有一个宏,可以在word文档中的某些选定文本上创建带有预定文本的注释。我需要做一个在他们每个不同的文本,每个有自己的单独按钮这些数字。所以,我想要的是一个单独的宏按钮,它会弹出一个对话框,创建这些按钮,并允许我填写以下三个变量: 新创建的宏的名称(和显示名称?) 该宏在功能区上特定组下特定选项卡下的选项卡位置(我希望能够输入选项卡,但每次组都相同) 要在新宏的注释框中输入的文本 如果有必要,

我正试图简化在word中创建大量几乎相同的宏的过程,并想知道是否有办法使用宏来实现这一点

我想要的是: 我有一个宏,可以在word文档中的某些选定文本上创建带有预定文本的注释。我需要做一个在他们每个不同的文本,每个有自己的单独按钮这些数字。所以,我想要的是一个单独的宏按钮,它会弹出一个对话框,创建这些按钮,并允许我填写以下三个变量:

  • 新创建的宏的名称(和显示名称?)
  • 该宏在功能区上特定组下特定选项卡下的选项卡位置(我希望能够输入选项卡,但每次组都相同)
  • 要在新宏的注释框中输入的文本
  • 如果有必要,我用于注释框的当前宏如下所示(注意,其中一些宏用于自动关闭在使用注释宏时一直打开的审阅窗格):

    感谢所有的帮助!!!多谢各位

    Dim n As Long
    n = ActiveWindow.Panes.Count
    
    'Adds Comment and text
    Selection.Comments.Add Range:=Selection.Range
    Selection.TypeText Text:="comment text here"
    
    'Auto-closes Reviewing Pane
    With ActiveWindow
    If .Panes.Count = n + 1 Then
    .Panes(n + 1).Close
    
    End If
    End With
    End Sub