在Excel 2010中隐藏或取消隐藏VBA的控件是正确的？

Excel 2010中的工作簿中有一个名为“MainSheet”的工作表。

此工作表包含一个名为“OptionButton1”的ActiveX控件。 当单元格的“C18”值是“2”时，应该隐藏这个控件。

我写下面的代码，但不工作。

►更多的问题：我可以有三个activeX（单选button）与一个单元格有三个不同的值，如单选button在窗体控制？

任何意见表示赞赏。 🙂

Sub MS_Method() If Range("C18").Value = 2 Then ActiveSheet.MainSheet("OptionButton1").Visible = False ElseIf Range("C18").Value = 1 Then ActiveSheet.MainSheet("OptionButton1").Visible = True End If End Sub 

Answer 1

假设您的ActiveX OptionButton命名为“OptionButton1”，下面的代码（testing）将工作：

 Option Explicit Sub MS_Method() Dim Sht As Worksheet ' modify "MainSheet" to your sheet name (where you have your OptionButton) Set Sht = ThisWorkbook.Sheets("MainSheet") If Range("C18").Value = 2 Then Sht.OLEObjects("OptionButton1").Visible = False ElseIf Range("C18").Value = 1 Then Sht.OLEObjects("OptionButton1").Visible = True End If End Sub