我正在尝试使用来自另一个工作表的.ListFillRange填充组合框,但是列表没有被填充。
我在单元格A2:A3000中有"sheet1“上的组合框和"sheet2”上的数据
在sheet1中,我尝试使用:
set ws = ThisWorkbook.Worksheets("sheet2")
set Rng = ws.Range("A2:A3000")
ComboBox.ListFillRange = ws.Range(Rng)
我也试过
ComboBox.ListFillRange = ws.Range("sheet2!A2:A3000")
然而,combobox没有被填充,有什么建议吗?
发布于 2015-01-29 04:51:54
ListFillRange是一个字符串,因此需要传入范围的地址。由于范围在另一个工作表上,因此您需要限定该地址。幸运的是,Address属性有一个外部参数。
Sheet1.ComboBox1.ListFillRange = Sheet2.Range("A2:A3000").Address(, , , True)
Address属性将如下所示
?Sheet2.Range("A2:A3000").Address(, , , True)
[Book2]Sheet2!$A$2:$A$3000
但是控件理解它并转换它。
?sheet1.ComboBox1.ListFillRange
Sheet2!$A$2:$A$3000
话虽如此,我从未使用过ListFillRange。我更喜欢自己使用List或AddItem填充控件。
https://stackoverflow.com/questions/28199576
复制相似问题