如何获得Excel单元格的“名称框”名称?

我在Excel中有一个单元格,通过使用Excel名称框将variables名称this_cells_name分配给单元格D2

以下是Excel名称框的一个例子:

Excel名称框

我希望能够指向该单元格并获取作为返回值的variables名称。

我知道如何做到以下几点:

  • 使用=CELL("address",D2)并获得"$D$2"作为返回值,
  • 使用=CELL("address",this_cells_name)并获得"$D$2"作为返回值。

我想要做到以下几点:

  • 使用=some_function(D2)并获取"this_cells_name"作为返回值。

我怎样才能做到这一点? VBA解决scheme将会很好。

你也可以使用

 Dim var as variant on error Resume Next var=Range("D2").Name.Name on error goto 0 if IsEmpty(var) then msgbox "Cell has no name" 

错误陷阱是为了处理单元格没有名字的情况

考虑:

 Public Function WhatsInAName(r As Range) As String WhatsInAName = "" For Each n In ThisWorkbook.Names If Range(n).Address(0, 0) = r.Address(0, 0) Then WhatsInAName = n.Name End If Next n End Function 

例如:

在这里输入图像描述