excel - 将每个单元格的名称设置为其内容/值

Question

我想创建一个宏，选择一个矩形单元格范围，并将每个单元格的名称设置为单元格的值/内容。

就我到目前为止的想法而言，我在 cell.Name 行中遇到了错误。

Public Sub NameCell()
Dim rng As Range
Dim cell As Range
Set rng = Range("A1:D1")
For Each cell In rng
    cell.Name = CStr(cell.Value)
Next
End Sub

Answer 1

这就是你的意思吗？

Sub setVal()
    Range("A1:C6").Select
    Selection = "value"
End Sub