Propriété ConnectorFormat.EndConnected (Publisher)
Renvoie une constante MsoTriState indiquant si la fin du connecteur spécifié est connectée à une forme. En lecture seule.
Syntaxe
expression. EndConnected
Expression Variable qui représente un objet ConnectorFormat .
Valeur renvoyée
MsoTriState
Remarques
Utilisez la propriété BeginConnected pour déterminer si le début d'un connecteur est relié à une forme.
La valeur de la propriété EndConnected peut être une des constantes MsoTriState déclarées dans la bibliothèque de type Microsoft Office et affichées dans le tableau suivant.
Constante | Description |
---|---|
msoFaux | La fin du connecteur spécifié n'est pas connectée à une forme. |
msoTriEtatMélangé | Valeur renvoyée uniquement ; Indique une combinaison de msoTrue et msoFalse pour la plage de formes spécifiée. |
msoVrai | La fin du connecteur spécifié est connectée à une forme. |
Exemple
Si la troisième forme de la première page de la composition active est un connecteur dont la fin est reliée à une forme, cet exemple stocke le numéro du point de connexion ainsi qu’une référence à la forme connectée, puis il dissocie la fin du connecteur de la forme.
Dim intSite As Integer
Dim shpConnected As Shape
With ActiveDocument.Pages(1).Shapes(3)
' Test whether shape is a connector.
If .Connector Then
With .ConnectorFormat
' Test whether connector is connected to another shape.
If .End Connected Then
' Store connection site number.
intSite = .EndConnectionSite
' Set reference to connected shape.
Set shpConnected = .EndConnectedShape
' Disconnect connector and shape.
.EndDisconnect
End If
End With
End If
End With
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