0

我在 Sheet2(不是用户窗体)中有两个组合框,分别名为 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"

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

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

4

1 回答 1

1

试试这个(为 ACTIVEX 组合尝试和测试

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

或者

Sub Init_Lists()
    MsgBox "Initializing..."
    Sheet2.Xchoose.AddItem "item 1"
    ' This subroutine will eventually add values from Sheet1.
End Sub
于 2012-08-16T20:18:28.427 回答