Compartir a través de


Propiedad Shape.AlternativeText (Visio)

Devuelve o establece la descripción de texto alternativo asociada a un objeto . Lectura y escritura.

Sintaxis

expresión. AlternativeText

Expresión Variable que representa un objeto Shape .

Valor devuelto

Cadena

Comentarios

Use esta propiedad para crear diagramas accesibles mediante Visio.

Nota:

A partir de Microsoft Visio 2016 C2R, puede usar AlternativeText en los objetos Page, Shape y Master .

Ejemplo:

Esta macro de Visual Basic para Aplicaciones (VBA) muestra cómo establecer y obtener la propiedad AlternativeText de una forma.

 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.