次の方法で共有


Shapes.AddCallout メソッド (PowerPoint)

輪郭なしの吹き出しを作成します。 新しい吹き出しを表す Shape オブジェクトを返します。

構文

AddCallout( _Type_, _Left_, _Top_, _Width_, _Height_ )

表現Shapes オブジェクトを表す変数です。

パラメーター

名前 必須 / オプション データ型 説明
必須 MsoCalloutType 引き出し線の種類を指定します。
Left 必須 単精度浮動小数点型 (Single) スライドの左端を基準に吹き出しの境界ボックスの左端の位置をポイント単位で指定します。
Top 必須 単精度浮動小数点型 (Single) スライドの上端を基準に吹き出しの境界ボックスの上端の位置をポイント単位で指定します。
Width 必須 単精度浮動小数点型 (Single) 吹き出しの境界ボックスの幅をポイント単位で指定します。
Height 必須 単精度浮動小数点型 (Single) 吹き出しの境界ボックスの高さをポイント単位で指定します。

戻り値

Shape

注釈

AddShape メソッドを使用すると、各種の吹き出しを挿入できます。

次の使用例は、自由に回転する単一のセグメントの引き出し線を持つ輪郭のない吹き出しを myDocument に追加し、次に、引き出し線の角度を 30 度に設定します。

Sub NewCallout() 
    Dim sldOne As Slide 
    Set sldOne = ActivePresentation.Slides(1) 
    sldOne.Shapes.AddCallout(Type:=msoCalloutTwo, Left:=50, Top:=50, _ 
        Width:=200, Height:=100).Callout.Angle = msoCalloutAngle30 
End Sub

関連項目

Shapes オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。