打开时出现列表框错误

Question

你好 Whosebug 社区

我需要有关 ListBox 错误的帮助。

我在工作表中有两个列表框（单个 select）而不在用户表单中

ListBox1 - 包含主要项目

ListBox2 - 包含与主要项目关联的子项目

当一个主要项目被 selected -

• 如果不存在子项，ListBox2.Visible = False

• 如果存在子项，ListBox2.Visible = True 且 .ListIndex = -1（准备子项 selection）

使用工作簿时 运行 的代码非常完美

问题 打开工作簿时，链接到 ListBox1 的宏将自动 运行 并弹出错误，以蓝色突出显示 '.ListBox2'

错误='Compile Error: Method or Data Member not found'

错误不会一直发生，并且无论工作簿保存时 ListBox2 可见与否，或者子项 selected 与否都没有关系。

我试过使用 on open workbook 事件，但错误出现在这些事件之前。

请帮忙

添加了发生错误的代码

Dim ListBox2 As ListObject 'Added this in to see if it fixes error but it has not

    With Sheet3.ListBox2
        .Height = 208.5
        .Width = 126.75
        .Top = 312.75
        .Left = 31.5
        .Visible = False
    End With

Answer 1

或者：

• 您没有名为 Listbox2、 或

的列表框

• Listbox2 不在名为 Sheet3

的工作表上

仔细检查您引用的对象名称是否正确。

确认列表框的名称：

• 单击 Developer > Design Mode > Right click 列表框 > Properties

• 如果它是一个 ActiveX 列表框，它将有一个 属性 列表 ，如下所示：

• 单击属性对话框中 (Name) 字段中的名称。确保名称的开头或结尾没有多余的 空格。

确认工作表名称：

Double-click 工作表底部的选项卡。确保名称的开头或结尾没有多余的 空格。

---

如果您仍然看不出问题：

• 在 ActiveX 属性对话框中将 Listbox2 重命名为 Listbox222。

• 双击 Sheet3 选项卡并键入 Sheet333。

• 将导致错误的引用更改为 Sheet333.Listbox222

---

更多信息

• Overview of working with Form Controls & Active controls programmatically（含 VBA）