Méthode Document.Drop (Visio)

Article
04/07/2023

Crée un objet Master en supprimant un objet sur un objet récepteur tel qu’un gabarit ou un document, ou la collection Masters ou MasterShortcuts .

Syntaxe

expression. Drop (ObjectToDrop, xPos, yPos)

Expression Variable qui représente un objet Document .

Parameters

Nom	Requis/Facultatif	Type de données	Description
ObjectToDrop	Requis	[UNKNOWN]	Objet à déplacer. Bien qu’il s’agit généralement d’un objet Visio tel qu’un objet Master, Shape ou Selection , il peut s’agir de n’importe quel objet OLE qui fournit une interface IDataObject .
xPos	Requis	Integer	Coordonnée x où placer le centre de la largeur de la forme ou PinX.
yPos	Requis	Integer	Coordonnée y où placer le centre de la hauteur de la forme ou PinY.

Valeur renvoyée

Master

Remarques

La méthode Drop revient à déplacer une forme à l'aide de la souris. L’objet supprimé ( ObjectToDrop) peut être une forme de base ou une forme sur la page de dessin.

Si ObjetÀDéplacer est un objet Master, l'axe de la forme de base est déposé aux coordonnées indiquées. L'axe d'une forme de base coïncide souvent, mais pas toujours, avec son centre de rotation.

Pour créer une nouvelle forme de base dans un gabarit, appliquez la méthode Drop à un objet Document représentant un gabarit (le gabarit doit être ouvert comme étant un original ou une copie autre qu'en lecture seule). Dans ce cas, les arguments xPos et yPos sont ignorés et le nouveau maître créé est retourné.

Exemple

L'exemple suivant indique comment utiliser la méthode Drop pour créer une forme de base en déplaçant une forme sur un objet Document.

 
Public Sub Drop_Example() 
 
    Dim vsoShape As Visio.Shape  
    Dim vsoMaster As Visio.Master  
 
    Set vsoShape = ActivePage.DrawRectangle(1, 2, 2, 1)  
 
    'Create a master in the document.  
    'The master appears on the document stencil.  
    Set vsoMaster = ActiveDocument.Drop(vsoShape, 0, 0)  
 
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