Share via


Shape.LinkToData, méthode (Visio)

Lie une forme à une ligne de données d'un jeu d'enregistrements de données.

Remarque

Cet objet ou ce membre Visio est disponible uniquement pour les titulaires d’une licence d’utilisation de Visio Professionnel 2013.

Syntaxe

expression. LinkToData( _DataRecordsetID_ , _RowID_ , _AutoApplyDataGraphics_ )

Expression Expression qui renvoie un objet Shape .

Parameters

Nom Requis/Facultatif Type de données Description
DataRecordsetID Obligatoire Long ID du jeu d’enregistrements de données contenant les données à lier.
Rowid Obligatoire Long ID de la ligne du jeu d'enregistrements de données qui contient l'enregistrement de données spécifique à lier.
AutoApplyDataGraphics Facultatif Boolean Spécifie si un graphique de données doit être appliqué automatiquement aux formes liées. Voir la section Remarques pour plus d'informations.

Valeur renvoyée

Aucune

Remarques

La méthode Shape.LinkToData est similaire à la méthode de l’objet Selection, Selection.LinkToData, à la différence qu’elle lie une seule forme, et non une sélection de formes, à une ligne de données.

Si vous transmettez la valeur True pour le paramètre AppliquerAutoGraphiquesDonnées, Microsoft Visio réapplique le graphique de données existant à une forme si un graphique de données lui a été déjà appliqué avant l’appel de la méthode. Pour une forme à laquelle aucun graphique de données n’a été précédemment appliqué, Visio applique le graphique de données le plus récemment appliqué à une autre forme du document actif.

Exemple

La macro Microsoft Visual Basic pour Applications (VBA) ci-dessous illustre comment utiliser la méthode LinkToData pour lier une forme à une ligne de données.

Avant d’exécuter cette macro, ajoutez au moins un jeu d’enregistrements de données à la collection DataRecordsets du document. La macro utilise l’ID du jeu d’enregistrements de données qui a été le plus récemment ajouté à la collection. Il dessine une forme rectangle sur la page et la lie aux données de la première ligne du jeu d’enregistrements de données, tout en appliquant le graphique de données par défaut à la forme.

Public Sub LinkToData_Example() 
 
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim vsoShape As Visio.Shape 
    Dim intCount As Integer 
     
    intCount = Visio.ActiveDocument.DataRecordsets.Count 
    Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount) 
     
    Set vsoShape = ActivePage.DrawRectangle(2, 2, 5, 5) 
     
    vsoShape.LinkToData vsoDataRecordset.ID, 1, True 
 
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.