我不知道为什么此行会引发“错误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
我不明白为什么会引发该错误,因为我看不到这段代码有任何问题。请帮助
答案 0 :(得分:2)
不是直接回答您的问题,而是相对于您所做的事情(我们看不到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
,可以是以前的引用,也可以是工作表名称,等等。