Excel VBA ListObjects 添加包含多个单元格的范围

Question

我是新会员，虽然我经常访问这个网站。如果我选择随机单元格，则无法将新项目添加到我的列表对象中。例如：

ActiveWorkbook.Names.Add _
    Name:="ErrorExample", _
    RefersTo:="=Sheet1!$A;Sheet1!$A;Sheet1!$A"

但是如果我选择相同范围内的单元格，我不会收到运行时错误 1004...例如：

ActiveWorkbook.Names.Add _
    Name:="RightExample", _
    RefersTo:="=Sheet1!$A:$A"

Answer 1

您正在向工作簿添加一个定义的名称。它与 ListObject.

无关

您收到错误的原因是您将范围地址与分号而不是逗号连接起来。

ActiveWorkbook.Names.Add Name:="ThisWorks", RefersTo:="=Sheet1!$A,Sheet1!$A,Sheet1!$A"

Excel VBA ListObjects Add Range with multiple cells