Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает или задает формулу, на которую ссылается имя. Формула на языке пользователя и в нотации в стиле A1, начиная со знака равенства. Для чтения и записи, String.
Синтаксис
expression. 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
Известные проблемы
Это свойство содержит ошибку. При назначении локализованной формулы этому свойству не удается. Свойство ожидает тот же синтаксис формулы, что и свойство RefersTo: разделители формата США и списка. Пример:
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 и обратная связь.