VBA ListBox 填充 #N/A 而不是命名范围

编程问答 2022-04-30

问题描述

我有这段代码来定义我的工作表上多选列表框的源范围。

Public Function ColourList() As Range
    Set ColourList = Range("Colours")
End Function

然后在创建 ListBox 的另一部分代码中引用 ColourList。

.ListFillRange = ColourList().Address

在我当前的工作表中，我定义了命名范围“颜色”，它指的是不同工作簿中的表格。

我遇到的问题是：

  • 如果当前工作簿中的命名范围“颜色”引用另一个工作簿中的表格编号，则所有工作表上的列表框填充 #N/A 等于表格中的行数。>

  • 如果当前工作簿中的命名区域引用了另一个工作簿中的命名区域，则所有工作表上的列表框将填充与命名区域中的行数相等的空白行。

  • 如果当前工作簿中的命名范围引用 Sheet1 上的单元格并定义为工作簿范围，则 Sheet1 上的 ListBoxes 会正确填充，但是所有其他工作表都会填充空白行，空白行等于命名范围。

如何让这些列表框在所有工作表上以及从引用另一个工作簿的命名范围中正确填充？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

excelexcellistboxnamed-rangesvba