Excel VBA ListObjects添加具有多个单元格的范围答案

【问题标题】：Excel VBA ListObjects Add Range with multiple cellsExcel VBA ListObjects添加具有多个单元格的范围
【发布时间】：2016-10-20 13:43:37
【问题描述】：

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

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

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

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

【问题讨论】：

【解决方案1】：

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

您收到错误的原因是您使用分号而不是逗号连接范围地址。

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

【讨论】：