设置单元格的名称等于相邻单元格的值

我有两列数据：第一个字符串，如“name1”，“name2”...，相邻列有数据但我想重命名单元格在这列中等于第一列的字符串值。例如：设置单元格的名称等于相邻单元格的值

1  2 
A name1 x 
B name2 y

因此，单元格A2应该获得name =“name1”。

Sub nameCells() 
    Worksheets("Output").Cells(1, "A").Name = "David" 
End Sub

这段代码名称的单元格A1 =“大卫”，但我无法弄清楚如何复制单元格，而不是硬编码的“大卫”的价值。

@pnuts谢谢你的第一个答案是完美的。我修复了这个问题以消除误导.Value（应该是.Name）。 –

如果@pnuts评论解决了您的问题，请考虑在idktho发布的答案中给出一个“接受答案”的答案（编辑后反映问题的变化现在与pnuts的评论相同）。接受帮助您在网站上获得宝贵声誉点的答案，并使人们更有可能在将来回答您的问题。 – YowE3K

仅供参考，有一种内置方式可以使用UI执行此操作 - http://www.k2e.com/tech-update/tips/418-tip-fastest-way-to-create-defined-names-in- excel –

Sub nameCells() 
    Worksheets("Output").Cells(1, "B").Name = Worksheets("Output").Cells(1, "A").Value 
End Sub

2017-08-08 02:12:27 idktho

由于对问题所做的更改，我编辑了您的答案。如果您不同意，请随时回滚到原始版本。 – YowE3K

回答