是否使用VBA将所选内容添加到命名范围？

我有一个名为tempPrintArea的命名范围，它引用

='Label packinglist'!$A$1:$J$59

我想使用VBA向其中添加另一个选择，以便它引用

='Label packinglist'!$A$1:$J$59,'Label packinglist'!$A$61:$J$110

我该怎么做

我想象着像这样的事情

范围（“tempPrintArea”）。参考=wks.Range（“tempPrintArea”）。地址和wks.Range（$A$61:$J$110）

---

。。。但这不起作用

假设您创建了如下命名范围：

Dim wks As Worksheet
Set wks = ThisWorkbook.Worksheets("Label packinglist")

wks.Names.Add Name:="tempPrintArea", RefersTo:=wks.Range("A1:J59")

下一步是向其添加新引用：

wks.Names("tempPrintArea").RefersTo = Union(wks.Range("tempPrintArea"), wks.Range("A61:J110"))

现在呢

Dim test As String
test = wks.Range("tempPrintArea").Address ' returns $A$1:$J$59,$A$61:$J$110

---

假设您创建了如下命名范围：

Dim wks As Worksheet
Set wks = ThisWorkbook.Worksheets("Label packinglist")

wks.Names.Add Name:="tempPrintArea", RefersTo:=wks.Range("A1:J59")

下一步是向其添加新引用：

wks.Names("tempPrintArea").RefersTo = Union(wks.Range("tempPrintArea"), wks.Range("A61:J110"))

现在呢

Dim test As String
test = wks.Range("tempPrintArea").Address ' returns $A$1:$J$59,$A$61:$J$110

---

您想添加对退出命名区域的引用还是创建新命名区域？我想添加对名为TempPrintArea的现有命名区域的引用您想添加对退出命名区域的引用还是创建新命名区域？我想添加对名为TempPrintArea的现有命名区域的引用无需两个步骤。第二步将覆盖任何现有名称，所以这就是您所需要的一切。@ExcelDevelopers，我知道，第一部分来自另一个OP的问题：我决定不使用它，不需要两个步骤。第二步将覆盖任何现有名称，所以这就是您所需要的。@ExcelDevelopers，我知道，第一部分来自另一个OP的问题：我决定离开它