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.
Obtient ou définit la valeur du champ Data3 pour un objet Shape . Lecture-écriture.
Syntaxe
expression. Data3
expression Une variable qui représente uneForme d’objet.
Valeur renvoyée
String
Remarques
Utilisez la propriété Data3 pour fournir des informations supplémentaires sur une forme. Elle peut contenir 64 Ko de caractères. Soyez vigilant lorsque vous utilisez des contrôles de texte avec une chaîne excédant 3 000 caractères. Définir la propriété Data3 équivaut à entrer des informations dans la zone Données 3 de la boîte de dialogue Spécial (cliquez sur Nom de la forme dans le groupe Création de forme sous l’onglet Développeur).
Exemple
Cette macro Microsoft Visual Basic pour Applications (VBA) indique comment définir les propriétés Data1, Data2 et Data3 d'une forme. Elle affiche les valeurs de ces propriétés dans la fenêtre Exécution. Vous pouvez également vous assurer que ces valeurs ont bien été définies en ouvrant la boîte de dialogue Spécial.
Public Sub Data123_Example()
Dim vsoPage As Visio.Page
Dim vsoShape As Visio.Shape
Set vsoPage = Documents.Add("").Pages(1)
Set vsoShape = vsoPage.DrawRectangle(3, 3, 5, 5)
'Use the Data1, Data2, and Data3 properties to set
'the shape's Data fields.
vsoShape.Data1 = "Data1_String"
vsoShape.Data2 = "Data2_String"
vsoShape.Data3 = "Data3_String"
'Use the Data1, Data2, and Data3 properties to verify
'the shape's Data field values.
Debug.Print vsoShape.Data1
Debug.Print vsoShape.Data2
Debug.Print vsoShape.Data3
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.