复选框 - 找不到方法或数据成员

时间:2018-01-05 03:40:37

标签: excel vba excel-vba

每当我点击Excel文件中的任何地方时,我正面临一个“方法或数据成员未找到”的问题。

它指示我在checkbox1下面。

enter image description here

毕竟,我按“确定”并突出显示黄色突出显示的查询。 enter image description here

非常奇怪的情况是这个错误只会在PC中弹出一个。

我尝试在其他PC上运行相同的excel文件并且运行良好。

工具>的其他信息参考如下图所示:

enter image description here

并且对象(Checkbox和CommandButton)也没有显示在下拉列表中。

enter image description here

任何人都可以帮忙吗?欣赏!!

1 个答案:

答案 0 :(得分:0)

在模块的代码窗格的顶部,有两个下拉菜单。左侧通常包含(General)用于普通模块或Worksheet用于表单模块。

假设您在Sheet1模块中,您是否可以在左下拉菜单中看到Checkbox1是否可用?

我对此感到有些陌生。如果您需要使用某些代码,则会获得一个带代码

的ActiveX控件复选框
Friend Function ActiveXCheckBox() As MSForms.CheckBox
    '* use this if you inserted a ActiveX Checkbox
    Dim myActiveXCheckbox As OLEObject
    Set myActiveXCheckbox = Me.OLEObjects.Item("CheckBox1")

    Dim chk As MSForms.CheckBox
    Set chk = myActiveXCheckbox.Object

    Set ActiveXCheckBox = chk

End Function

在工作表上删除ActiveX控件应该自动添加属性,通常可以在工作簿的对象浏览器中看到它。您的代码依赖于它。