我在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"
错误“需要对象”。我已经尝试将子例程放在一个单独的模块中,但是我收到了同样的错误。
有人可以解释我如何在这些组合框中添加项目吗?谢谢!
答案 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