Question

我不知道为什么此行会引发“错误1004：应用程序定义或对象定义的错误”？有人可以帮忙吗？

对象“ CombQTY”是用户窗体“ MASTER”中的组合框。我正在尝试使用范围“ QTY_range”（大小为一列中的31行数字= 0、1、2、3，.. 30）填充此组合框的下拉菜单。

我尝试将“用户表单”与“主”交换，反之亦然。

Private Sub Userform_Initialize()

MASTER.CombQTY.List = Worksheets("RANGES").Range("QTY_range").Value

End Sub

我不明白为什么会引发该错误，因为我看不到这段代码有任何问题。请帮助

Answer 1

不是直接回答您的问题，而是相对于您所做的事情（我们看不到QTE_range地址是什么）。

我倾向于循环并收集列表，因此我不必担心命名范围的尺寸（列多于行）..示例代码（未经测试）：

dim i as range, a as range, arr as variant
set a = thisworkbook.names("QTE_range").referstorange
for each i in a
    if arr(ubound(arr)) <> "" then redim preserve arr(ubound(arr)+1)
    arr(ubound(arr)) = i.value
next 
Me.CombQTY.List = arr

请注意引用...用户窗体是Me，工作簿是thisworkbook，可以是以前的引用，也可以是工作表名称，等等。

错误1004初始化用户窗体对象？

1 个答案: