Name.RefersToLocal 属性 (Excel)

返回或设置指定名称所引用的公式。 公式以等号开头，由用户语言和 A1-样式引用组成。 读/写 String。

语法

表达式。RefersToLocal

表达 一个代表 Name 对象的变量。

示例

本示例新建一个工作表，并将当前工作簿所有名称的列表插入到新工作表中，名称列表中包括其公式（由 A1-样式引用和用户语言组成）。

Set newSheet = ActiveWorkbook.Worksheets.Add 
i = 1 
For Each nm In ActiveWorkbook.Names 
 newSheet.Cells(i, 1).Value = nm.NameLocal 
 newSheet.Cells(i, 2).Value = "'" & nm.RefersToLocal 
 i = i + 1 
Next

已知问题

此属性有一个 bug。 将本地化公式分配给此属性失败。 属性需要与 RefersTo 属性相同的公式语法：US 格式和列表分隔符。 示例：

Sub Example()
    Dim Nm As Name
    Set Nm = ThisWorkbook.Names("test")
    'If Windows is set to use ; as listseparator, this fails:
    Nm.RefersToLocal = "=SUM(Sheet1!$A$1,Sheet1!$A$3)"
    'If Windows is set to use ; as listseparator, this works:
    Nm.RefersToLocal = "=SUM(Sheet1!$A$1;Sheet1!$A$3)"
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。