通过

CanvasShapes.AddCallout Method

  • 项目
Word Developer Reference

Adds a borderless line callout to a drawing canvas. Returns a Shape object that represents the callout.

Syntax

expression.AddCallout(Type, Left, Top, Width, Height)

expression   Required. A variable that represents a CanvasShapes collection.

Parameters

Name Required/Optional Data Type Description
Type Required MsoCallout The type of callout.
Left Required Single The position, in points, of the left edge of the callout's bounding box.
Top Required Single The position, in points, of the top edge of the callout's bounding box.
Width Required Single The width, in points, of the callout's bounding box.
Height Required Single The height, in points, of the callout's bounding box.

Remarks

You can insert a greater variety of callouts, such as balloons and clouds, using the AddShape method.

Example

This example adds a callout to a newly created drawing canvas.

Visual Basic for Applications 
  Sub NewCanvasCallout()
    Dim shpCanvas As Shape

'Add drawing canvas to the active document
Set shpCanvas = ActiveDocument.Shapes.AddCanvas _
    (Left:=150, Top:=150, Width:=200, Height:=300)

'Add callout to the drawing canvas
shpCanvas.CanvasItems.<strong class="bterm">AddCallout</strong> _
    Type:=msoCalloutTwo, Left:=100, _
    Top:=40, Width:=150, Height:=75



End Sub

See Also