Свойство Shape.AlternativeText (Visio)

Статья
04/07/2023

Возвращает или задает альтернативное текстовое описание, связанное с объектом . Для чтения и записи.

Синтаксис

expression. AlternativeText

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

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

Строка

Замечания

Используйте это свойство для создания схем со специальными возможностями с помощью Visio.

Примечание.

Начиная с Microsoft Visio 2016 C2R, вы можете использовать AlternativeText для объектов Page, Shape и Master .

Пример

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

 public Sub ShapeAlternativeText_Example()  
 
     Dim vsoRectangle As Visio.Shape  
     
      'Create a rectangle shape and add alternative text to it. 
    Set vsoRectangle = ActivePage.DrawRectangle(2, 3, 5, 4)   
    vsoRectangle.AlternativeText = "Rectangle Shape alternative text"  
   
     'Get a Cell object from the shape. 
    Set vsoCell = vsoRectangle.Cells("Width")  
  
     'Use the Shape property to get the Shape object. 
    Set vsoShapeFromCell = vsoCell.Shape  
 
     'Use shape's alternative text to verify the proper Shape 
    'object was returned.  
    Debug.Print vsoShapeFromCell.AlternativeText 
 
 End Sub

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

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

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