excel电子表格引用activex控件

时间:2014-09-24 08:16:23

标签: vba excel-vba excel

我正在使用Excel 2013.我已将activex控件添加到电子表格中。控件是一个复选框,我将其命名为chkAD1。我的电子表格名为" timeseries_AD"。

我试图引用复选框来检查其值,但没有任何乐趣。我试过以下几行,

 worksheets("timeseries_AD").OleObjects("chkAD1").Value

这会导致错误消息"无法获取工作表类的#OLE的OLEObjects属性。

我读过一个activex控件有两个名字。一个是包含控件的形状的名称,另一个是代码名称。我不知道我改变了哪一个。我点击了我的控件,并在名称框中将其重命名为" chkAD1"。那是我改变的形状名称或代号吗?

更新 - 道歉

很抱歉,我添加的控件不是activex控件,它实际上是一个表单控件。

1 个答案:

答案 0 :(得分:2)

我尝试了这个,它对我有用 当我选中此框时,我会收到一个显示为TRUE的消息框 当我取消选中它时,我会收到一个说明为FALSE的消息框

Private Sub CheckBox1_Click()
    MsgBox CheckBox1.Value
End Sub