Shape.BreakLinkToData, méthode (Visio)

Article
04/07/2023

Rompt la liaison entre la forme et la ligne de données à laquelle elle est liée dans le jeu d'enregistrements de données spécifié.

Remarque

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

Syntaxe

expression. BreakLinkToData( _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 de données à laquelle est liée la forme.

Valeur renvoyée

Aucune

Remarques

Rompre la liaison entre une forme et une ligne de données n’entraîne pas la suppression des données de forme (appelée propriétés personnalisées dans certaines versions antérieures de Visio) et des graphiques de données associés à la forme.

Exemple

La macro Microsoft Visual Basic pour Applications (VBA) ci-dessous illustre comment utiliser la méthode BreakLinkToData pour rompre la liaison entre une forme et une ligne de données d'un jeu d'enregistrements de données.

Avant d’exécuter cette macro, placez une forme sur la page, ajoutez au moins un jeu d’enregistrements de données à la collection DataRecordsets du document et utilisez n’importe quelle méthode de liaison pour lier la forme à une ligne de données dans le jeu d’enregistrements de données que vous avez ajouté récemment à la collection. (Vous pouvez par exemple lier la forme à une ligne de données en faisant glisser cette dernière de la fenêtre Données externes vers la forme dans l’interface utilisateur de Visio). Sélectionnez ensuite la forme liée.

Public Sub BreakLinkToData_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 = ActiveWindow.Selection.PrimaryItem 
    vsoShape.BreakLinkToData (vsoDataRecordset.ID) 
    
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.

Partager via