Shape.AlternativeText-Eigenschaft (Visio)

Gibt die mit einem Objekt verknüpfte alternative Textbeschreibung zurück oder legt sie fest. Lese-/Schreibzugriff.

Syntax

Ausdruck verwendet werden. AlternativeText

expression Eine Variable, die ein Shape-Objekt darstellt.

Rückgabewert

Zeichenfolge

Hinweise

Verwenden Sie diese Eigenschaft, um barrierefreie Diagramme mithilfe von Visio zu erstellen.

Hinweis

Ab Microsoft Visio 2016 C2R können Sie AlternativeText auf Page-, Shape- und Master-Objekten verwenden.

Beispiel

Dieses Visual Basic for Applications (VBA)-Makro zeigt, wie Sie die AlternativeText-Eigenschaft einer Form festlegen und abrufen.

 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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.