在 word VBA 中创建单选按钮

Create radio buttons in word VBA

有没有办法创建一个宏,当它被激活时,会向用户显示一些选项,然后根据用户的选择调用其他宏?

例如:

Message box: Are you a male or female?

Option 1: Male

Option 2: Female

如果用户选择"Male,"执行宏A.如果"Female,"宏B.

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

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

    那里有一个工具箱(如果没有,请单击“查看”->“工具箱”)和一个用户表单 canvas

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

  • select用户窗体中的第一个选项按钮,点击它的caption(默认显示一些"OptionButton1")并编辑它为"Male"

  • 对第二个选项按钮执行相同操作并将其标题编辑为 "Female"

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

    它会告诉你

    Private Sub OptionButton1_Click()
    
    End Sub
    

    然后填写如下:

    Private Sub OptionButton1_Click()
        macroA
    End Sub
    
  • 在用户表单的第二个选项按钮上单击两次

    它会告诉你

    Private Sub OptionButton2_Click()
    
    End Sub
    

    然后填写如下:

    Private Sub OptionButton2_Click()
        macroB
    End Sub
    

这会让你开始