excel - 在 Excel 中创建名称范围的动态更改名称

Question

我正在寻找一种在 Excel 中创建名称范围的动态变化名称的方法。例如:

A1 = "John"
A2 = 32
A3 = "st.lo"

现在我希望 A1:A3 范围的名称为“John”请注意，A1 的值可以更改为另一个值，例如:

A1 = "michele"

现在我希望范围 A1:A3 的名称将更改为“michele”(自动)。提前致谢

Answer 1

您可以在事件中使用:

Private Sub Worksheet_Change(ByVal Target As Range)

这段代码:

ActiveWorkbook.Names(Range("A1").CurrentRegion.Name.Name).Name = Range("A1").Value

每次更改单元格 A1 的名称时，宏都会更改范围的名称...
我解释一下:直接从单元格“A1”中获取范围的名称:

Range("A1").CurrentRegion.Name.Name

以及范围名称的集合:

ActiveWorkbook.Names(

使用新值“A1”更改名称:

).Name 

可以吗？

对于每个范围:
在你的宏中:

For Each xx In ActiveWorkbook.Names
    CellRange = Cells(Range(xx.Value).Row, Range(xx.Value).Column)
    xx.Name = CellRange
Next

注意不要有两个同名的单元格。范围的名称应该是唯一的...
解释:对于工作簿中的每个 RangeName，我采用(2°行)第一个单元格的值，该单元格为我提供了范围名称。改名后...