我有一个命名范围 = $A$1:$S$34。我无法将其复制到同一张表中命名范围之外的另一个单元格中。你能帮忙吗?
答案1
以下是复制/粘贴的示例Named Range
:
Sub KopyKat()
Range("$A$1:$S$34").Name = "HomeHomeOnTheRange"
Range("HomeHomeOnTheRange").Copy Range("Z100")
End Sub
Name
(您可以根据您和您的目标单元格调整此代码)
编辑#1:
以下是允许用户在运行时指定目的地的示例:
Sub KopyKat2()
Dim s As String
s = Application.InputBox(prompt:="please enter destination address like" & vbCrLf & "S100:", Type:=2)
Range("$A$1:$S$34").Name = "HomeHomeOnTheRange"
Range("HomeHomeOnTheRange").Copy Range(s)
End Sub