Edit

CalloutFormat.CustomDrop method (Word)

  • Article

Sets the vertical distance (in points) from the edge of the text bounding box to the place where the callout line attaches to the text box.

Syntax

expression.CustomDrop (Drop)

expression Required. A variable that represents a 'CalloutFormat' object.

Parameters

Name Required/Optional Data type Description
Drop Required Single The drop distance, in points.

Remarks

This distance is measured from the top of the text box unless the AutoAttach property is set to True and the text box is to the left of the origin of the callout line (the place that the callout points to), in which case the drop distance is measured from the bottom of the text box.

If the PresetDrop method was previously used to set the drop for the specified callout, use the following statement before using the CustomDrop method so that the custom drop setting takes effect.

PresetDrop msoCalloutDropCustom

Example

This example cancels any preset drop that's been set for the first shape in the active document, sets the custom drop distance to 14 points, and specifies that the drop distance always be measured from the top. For the example to work, the first shape must be a callout.

Dim docActive As Document 
 
Set docActive = ActiveDocument 


With docActive.Shapes(1).Callout 
 .PresetDrop msoCalloutDropCustom 
 .CustomDrop 14 
 .AutoAttach = False 
End With

See also

CalloutFormat Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.