VBA – select单选button时触发macros

我在select单选button选项时遇到了自动运行macros的问题。 有两个单选button选项，链接到名为“MAIN”的工作表上名为“SimType”的单元格。 我已经从MSDN调整了下面的代码，并将它包含在MAIN工作表的模块中，但无法启动它：

Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range Set KeyCells = Range("SimType") If Not Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then RefreshSimsList End If End Sub 

我知道目标是指的ActiveCell，所以当我手动input值1或2到范围（“SimType”），macros触发。 但是，当单元格被链接的单选button更改时，不会触发任何操作。 我能做些什么来让表单识别出这个值已经被改变了，而不是ActiveCell？

Answer 1

将此代码放在一个模块中

 Sub OptCommon() ' '~~> Rest of the code ' End Sub 

只需右键单击这两个选项button并将其分配给它。 现在不仅单元格值会改变，而且macros也会运行。