Shape.GetLinkedDataRow, méthode (Visio)

Article
04/07/2023

Renvoie l’ID de la ligne de données du jeu d’enregistrements de données spécifié qui est liée à la forme.

Remarque

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

Syntaxe

expression. GetLinkedDataRow( _DataRecordsetID_ )

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 qui contient la ligne liée.

Valeur renvoyée

Entier long

Remarques

La méthode GetLinkedDataRow échoue si la forme n'est pas liée à une ligne de données.

Exemple

La macro Microsoft Visual Basic pour Applications (VBA) suivante montre comment utiliser la méthode GetLinkedDataRow pour obtenir l’ID de la ligne de données dans le jeu d’enregistrements de données spécifié lié à la forme.

Avant d’exécuter cette macro, ajoutez au moins un jeu d’enregistrements de données à la collection DataRecordsets du document. La macro dépose une forme sur la page, la lie à une ligne de données dans le jeu d’enregistrements de données le plus récemment ajouté à la collection, obtient l’ID de la ligne, puis imprime l’ID de la ligne dans la fenêtre Exécution.

Public Sub GetLinkedDataRow_Example() 
 
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim vsoShape As Visio.Shape 
    Dim intCount As Integer 
    Dim lngRowID As Long 
     
    intCount = Visio.ActiveDocument.DataRecordsets.Count 
    Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount) 
     
    Set vsoShape = ActivePage.DrawRectangle(2, 2, 4, 4) 
         
    vsoShape.LinkToData vsoDataRecordset.ID, 1, True 
            
    lngRowID = vsoShape.GetLinkedDataRow(vsoDataRecordset.ID) 
    Debug.Print lngRowID 
         
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.

Share via