vba - 宏录制定义单元格名称

Question

我已经录制了一个带有相对引用的宏，其中第一个单元格是我想要指定范围的名称，因此我选择要命名的范围 -> 右键单击​​ -> 定义名称 -> 因为名称已经是包含在第一个单元格中，我不需要更改任何内容，因此 -> 我单击“确定”。

Example
A1:B5 - I want to name it TSLA56
then I go to D1 to run the recorded macro to name D1:E5 to TSLA23

宏运行完成后，它仍然被称为D1

我做错了什么？这可能吗？

录制宏:

Sub DefineName()
'
' DefineName Macro
'

'
    ActiveCell.Range("A1:B5").Select
    ActiveWorkbook.Names.Add Name:="TSLA56", RefersToR1C1:="=Sheet1!R1C1:R5C2"
    ActiveWorkbook.Names("TSLA56").Comment = ""
End Sub

1 :

Answer 1

虽然您的操作尽可能被记录为相对，但在定义名称时，一些诸如 Name:= 和 .RefersTo:= 之类的内容不是相对的。您可以通过编辑选择地址并将其传递到宏代码行来调整此设置。

ActiveWorkbook.Names.Add Name:=selection.cells(1,1).value, refersTo:="=" & selection.address

selection.cells(1,1).value 指任何单个或多个单元格选择的左上角单元格中的值。