VBA,Excel中的选项按钮选择事件

时间:2017-04-28 15:45:41

标签: excel-vba vba excel

我在VBA上创建了一组选项按钮,选中它们时必须管理相应的事件。示例:如果选择了OptionButton1,则必须出现与该按钮对应的特定代码行。我尝试使用下面的代码,但它没有用,什么是正确的语法?

      If o1.Value = True Then
      stmt1
      ElseIf o2.Value = True Then
      stmt2
      End If

这里o1和o2是两个不同的选项按钮。

1 个答案:

答案 0 :(得分:0)

也许以下截屏视频可以帮助您解决问题。

enter image description here

这些项目最重要的是(1)名称正确,(2)按钮的代码位于表单上,(3)其他宏的代码在模块中

请在截屏视频中注意我调整了选项按钮的名称。由于按钮的代码在表单上,​​Me引用表单,VBE自动检测表单上的所有可用对象。因此,当我开始使用Me.输入时,我会自动看到两个名称为.01.02的选项按钮。

另请注意,.Value不是必需的,因为它是默认值。因此,将其添加到代码或跳过它不会改变任何东西(它仍将按原样工作)。最后,无需检查True = True。如果选项按钮.ValueTrue,则If语句会将其评估为True。所以,你可能再次决定跳过写= True(就像我做的那样),或者你可以将其添加到代码中。这不会改变一件事,它会以任何方式发挥作用。