RefersTo 属性

       

用宏语言以 A1-样式的记号返回或设置名称所引用的公式(以等号开头)。String 类型,可读写。

示例

本示例创建活动工作簿中所有名称的列表,并用宏语言以 A1 样式的记号表示这些名称所引用的公式。该列表将出现在本示例新建的工作表中。

Set newSheet = Worksheets.Add
i = 1
For Each nm In ActiveWorkbook.Names
    newSheet.Cells(i, 1).Value = nm.Name
    newSheet.Cells(i, 2).Value = "'" & nm.RefersTo
    i = i + 1
Next
newSheet.Columns("A:B").AutoFit