Shapes.AddCallout メソッド (Word)
描画キャンバスに輪郭のない線吹き出しを追加します。
構文
式。AddCallout (型、 左、 上、 幅、 高さ)
expression 必須です。 Shapes オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
型 | 必須 | MsoCalloutType | 引き出し線の種類を指定します。 |
Left | 必須 | Single | 吹き出しの境界ボックスの左端の 位置をポイント単位で指定します。 |
Top | 必須 | 単精度浮動小数点型 (Single) | 吹き出しの境界ボックスの上端の位置をポイント単位で指定します。 |
Width | 必須 | 単精度浮動小数点型 (Single) | 吹き出しの境界ボックスの幅をポイント単位で指定します。 |
Height | 必須 | 単精度浮動小数点型 (Single) | 吹き出しの境界ボックスの高さをポイント単位で指定します。 |
戻り値
注釈
AddShape メソッドを使用すると、吹き出しや雲など、さまざまな吹き出しを挿入できます。
例
次の使用例は、新しく作成した描画キャンバスに吹き出しを追加します。
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.AddCallout _
Type:=msoCalloutTwo, Left:=100, _
Top:=40, Width:=150, Height:=75
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。