在Word VBA中创建单选按钮

ngu*_*ong 1 vba ms-word ms-office

有没有一种方法可以创建一个宏,在激活时会向用户提供一些选项,然后根据用户选择的内容调用其他宏?

例如:

留言框:你是男还是女?

选项 1:男性

选项 2:女性

如果用户选择“男性”,则执行宏 A。如果用户选择“女性”,则执行宏 B。

Dis*_*ame 6

  • 在 Word UI 中按 ALT F11 打开 VBA IDE

  • 在主功能区中单击插入 -> 用户表单

    那里有一个工具箱(如果没有,请单击“视图”->“工具箱”)和一个用户窗体画布

  • 从工具箱中拖动选项按钮图标并将其放入用户窗体的所需位置。重复两次

  • 选择用户表单中的第一个选项按钮,单击它caption(默认显示一些“OptionButton1”)并将其编辑为“Male”

  • 对第二个选项按钮执行相同操作,并将其标题编辑为“女性”

  • 单击用户窗体上的第一个选项按钮两次

    它会告诉你

    Private Sub OptionButton1_Click()
    
    End Sub
    
    Run Code Online (Sandbox Code Playgroud)

    然后填写如下:

    Private Sub OptionButton1_Click()
        macroA
    End Sub
    
    Run Code Online (Sandbox Code Playgroud)
  • 单击用户窗体上的第二个选项按钮两次

    它会告诉你

    Private Sub OptionButton2_Click()
    
    End Sub
    
    Run Code Online (Sandbox Code Playgroud)

    然后填写如下:

    Private Sub OptionButton2_Click()
        macroB
    End Sub
    
    Run Code Online (Sandbox Code Playgroud)

这将帮助你开始

  • @ashleedawg,好吧,有人必须为此感谢你,所以我会的! (2认同)