Поделиться через


свойство Application.Name (Visio)

Указывает имя объекта. Только для чтения.

Синтаксис

expression. Имя

выражение: переменная, представляющая объект Application.

Возвращаемое значение

Строка

Замечания

Можно получить, но не задать, свойство Name объекта Document . Если документ еще не называется, это свойство возвращает временное имя документа, например Drawing1 или Stencil1.

Вы можете получить, но не задать, свойство Name объекта Addon или Объекта Font .

Вы можете получить, но не задать, свойство Name объекта Cell . Некоторые ячейки находятся в именованных строках; Вы можете получить и задать имя именованной строки с помощью свойства RowName .

Можно задать свойство Name объекта Style , представляющего стиль, который не является стилем Microsoft Office Visio по умолчанию. При попытке задать свойство Name стиля Visio по умолчанию, возникает ошибка.

Ячейка имеет как локальное, так и универсальное имя. Локальное имя зависит от языкового стандарта, для которого установлена запущенная версия Microsoft Windows. Универсальное имя совпадает независимо от установленного языкового стандарта. Чтобы получить универсальное имя ячейки, используйте свойство Name . Чтобы получить локальное имя, используйте свойство LocalName .

Примечание.

Начиная с Microsoft Visio 2000, вы можете использовать локальные и универсальные имена для ссылки на фигуры Visio, образцы, документы, страницы, строки, надстройки, ячейки, гиперссылки, стили, шрифты, основные сочетания клавиш, объекты пользовательского интерфейса и слои. Например, когда пользователь присваивает имя фигуре, пользователь указывает локальное имя. Начиная с Visio 2003 электронная таблица ShapeSheet отображает только универсальные имена в формулах и значениях ячеек. (В предыдущих версиях универсальные имена не отображались в пользовательском интерфейсе.)

Как разработчик, вы можете использовать универсальные имена в программе, если вы не хотите изменять имя каждый раз, когда решение локализуется. Используйте свойство Name, чтобы получить или задать локальное имя объекта Hyperlink, Layer, Master, MasterShortcut, Page, Shape, Style или Row объекта. Используйте свойство NameU , чтобы получить или задать его универсальное имя.

Пример

В этом макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать свойство Name для отображения имен слоев. Он также использует свойство Layer для получения ссылки на определенный слой и свойство LayerCount для определения количества слоев, которым назначена фигура.

 
Public Sub Name_Example() 
 
 Dim vsoPage As Visio.Page 
 Dim vsoShape As Visio.Shape 
 Dim vsoLayers As Visio.Layers 
 Dim vsoLayer As Visio.Layer 
 
 If ActiveDocument Is Nothing Then 
 Documents.Add ("") 
 End If 
 
 Set vsoPage = ActivePage 
 If vsoPage Is Nothing Then 
 Set vsoPage = ActiveDocument.Pages(1) 
 End If 
 
 'Draw a rectangle. 
 Set vsoShape = vsoPage.DrawRectangle(1, 5, 5, 1) 
 
 'Get the Layers collection. 
 Set vsoLayers = vsoPage.Layers 
 
 'Create a layer named ExampleLayer1 and add the shape to it. 
 Set vsoLayer = vsoLayers.Add("ExampleLayer1") 
 vsoLayer.Add vsoShape, 1 
 
 'Create a layer named ExampleLayer2 and add the shape to it. 
 Set vsoLayer = vsoLayers.Add("ExampleLayer2") 
 vsoLayer.Add vsoShape, 1 
 
 'Verify that the shape has been assigned to 2 layers. 
 Debug.Print "The page has " & vsoShape.LayerCount & " layers." 
 
 'Get a reference to the first layer. 
 Set vsoLayer = vsoShape.Layer(1) 
 
 'Verify by using the Name property. 
 Debug.Print "Current vsoLayer name is """ & vsoLayer.Name & ".""" 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.