Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Cette propriété renvoie ou définit la description de texte de remplacement associée à un objet . Lecture-écriture.
Syntaxe
expression. Texte alternatif
expression Une variable qui représente uneForme d’objet.
Valeur renvoyée
String
Remarques
Utilisez cette propriété pour créer des diagrammes accessibles à l’aide de Visio.
Remarque
À compter de Microsoft Visio 2016 C2R, vous pouvez utiliser AlternativeText sur les objets Page, Shape et Master .
Exemple
Cette macro Visual Basic pour Applications (VBA) montre comment définir et obtenir la propriété AlternativeText d’une forme.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.