Vba 引用activex控件的excel电子表格

我正在使用Excel 2013。我已将activex控件添加到电子表格中。该控件是我命名为chkAD1的复选框。我的电子表格名为“timeseries_AD”

我试图引用复选框来检查它的值，但是没有任何乐趣。我试过下面的句子

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

这将导致错误消息“无法获取工作表类的OLEObjects属性”

我读到activex控件有两个名称。一个是包含控件的形状的名称，另一个是代码名。我不确定我换了哪一个。我点击我的控件，并在名称框中将其重命名为“chkAD1”。这是我更改的形状名称还是代号

更新-道歉

---

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

我尝试了这个，它对我有效。
当我选中该框时，我会得到一个消息框，上面写着TRUE。
当我取消选中它时，我会得到一个消息框，上面写着FALSE

Private Sub CheckBox1_Click()
    MsgBox CheckBox1.Value
End Sub

---

使用复选框转到工作表。进入设计模式（插入按钮旁边的按钮），然后在设计模式下双击复选框。

Msgbox工作表（“timeseries\u AD”）.Shapes（“chkAD1”）.Name

返回什么？错误？@Goosebumbs我处于设计模式，双击控件没有任何作用？@Rory该行返回我的名称，即“chkAD1”，请确保选中复选框，然后再双击它