初始化工作表中的组合框(不是表单) - 错误:需要对象

时间:2012-08-16 19:57:12

标签: excel vba excel-vba

我在Sheet2中有两个组合框(不是UserForm),名为Xchoose和Ychoose。我希望在打开工作簿时使用Sheet1中单元格的值填充它们。

此时,我甚至无法在组合框中添加静态字符串。这是我到目前为止的设置......

在ThisWorkbook中,我有:

Sub Workbook_Open()
    Call Sheet2.Init_Lists
End Sub

在Sheet2(比较)中,我有:

Sub Init_Lists()
    MsgBox "Initializing..."
    Xchoose.AddItem "item 1"
    ' This subroutine will eventually add values from Sheet1.
End Sub

Sub Xchoose_Change()
    ' To do.
End Sub

Sub Ychoose_Change()
    ' To do.
End Sub

打开工作簿时出现“正在初始化...”消息框,表示Init_Lists正常工作,但程序在行中断开

Xchoose.AddItem "item 1"

错误“需要对象”。我已经尝试将子例程放在一个单独的模块中,但是我收到了同样的错误。

有人可以解释我如何在这些组合框中添加项目吗?谢谢!

1 个答案:

答案 0 :(得分:1)

尝试此操作(为ACTIVEX COMBO进行测试和测试

Private Sub Workbook_Open()
    Sheet2.Xchoose.AddItem "item 1"
End Sub

OR

Sub Init_Lists()
    MsgBox "Initializing..."
    Sheet2.Xchoose.AddItem "item 1"
    ' This subroutine will eventually add values from Sheet1.
End Sub
相关问题