Propriété Shape.Data1 (Visio)
Récupère ou définit la valeur du champ Données 1 d'un objet Shape. Lecture-écriture.
Syntaxe
expression. Data1
Expression Variable qui représente un objet Shape .
Valeur renvoyée
Chaîne
Remarques
Utilisez la propriété Data1 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é Data1 équivaut à entrer des informations dans la zone Données 1 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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour