vba - 使用VBA将选择添加到命名范围吗？

我有一个名为tempPrintArea的命名范围，是指

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

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

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

我怎样才能做到这一点？

我正在设想类似

Range（“ tempPrintArea”）。RefersTo = wks.Range（“ tempPrintArea”）。Address＆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

关于vba - 使用VBA将选择添加到命名范围吗？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/23013136/