Excel中的名称,就是被命名的公式,可以在名称管理器中看到它们。 找到这些名称信息不是困难的事,但是当工作簿中存在大量的名称时,再查阅或了解其中的信息,使用名称管理器可能会显得不那么方便。 对的,你猜到了,我们可以用VBA来获得Excel工作簿中所有的名称信息,代码如下。 Sub 获取名称信息() Dim Sht As Worksheet, C As Name Set Sht = ActiveSheet '假设要获取活动工作表中的名称 On Error Resume Next For Each C In Names Sht.Range('A' & Rows.Count).End(xlUp)(2) = C.Name Sht.Range('B' & Rows.Count).End(xlUp)(2) = ''' & C.RefersTo Next C On Error GoTo 0 End Sub 这样,只需要执行这些代码,就能将活动工作表中所有名称信息全部写入工作表的A、B两列了。 关注Excel笔记,学更多Excel技巧! |
|