Propriété CalloutFormat.Drop (Publisher)

Pour les légendes ayant définie de manière explicite drop valeur, cette propriété renvoie la distance verticale entre le bord de la zone de texte à l'endroit où la ligne de légende rejoint la zone de texte.

Cette distance est mesurée à partir du haut de la zone de texte, sauf si la propriété AutoAttach a la valeur True et que la zone de texte est à gauche de l’origine de la ligne de légende (où la légende pointe). Dans ce cas, la distance de déroulement est mesurée à partir du bas de la zone de texte. Variant en lecture seule.

Syntaxe

expression. Goutte

expression Variable qui représente un objet CalloutFormat .

Valeur renvoyée

Variant

Remarques

Les valeurs numériques sont évaluées en points ; les chaînes peuvent être dans n’importe quelle unité prise en charge par Microsoft Publisher (par exemple, « 2,5 pouces »).

Utilisez la méthode CustomDrop pour définir la valeur de cette propriété.

La valeur de cette propriété reflète avec précision la position de la ligne de légende jointe à la zone de texte uniquement si la légende a une valeur de suppression explicitement définie, c’est-à-dire si la valeur de la propriété DropType est msoCalloutDropCustom.

Exemple

Cet exemple remplace le déplacement personnalisé de la première forme de la composition active par l'un des deux déplacements préréglés, selon que la valeur du déplacement personnalisé est supérieure ou inférieure à la moitié de la hauteur de la zone de texte de la légende. Pour que cet exemple fonctionne, cette forme doit être une légende.

With ActiveDocument.Pages(1).Shapes(1).Callout 
 If .DropType = msoCalloutDropCustom Then 
 If .Drop < .Parent.Height / 2 Then 
 .PresetDrop DropType:=msoCalloutDropTop 
 Else 
 .PresetDrop DropType:=msoCalloutDropBottom 
 End If 
 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.