明示的に設定されたドロップ値を持つ吹き出しでは、境界ボックスの端から、引き出し線がテキスト ボックスに接する位置までの垂直距離を取得します。
この距離は、 AutoAttach プロパティが True に設定されていて、テキスト ボックスが吹き出し線の原点 (吹き出しが指す場所) の左側にない場合、テキスト ボックスの上部から測定されます。 値の取得のみ可能です。 読み取り専用のバリアント型 (Variant) の値。
構文
式。Drop
式CalloutFormat オブジェクトを表す変数。
戻り値
バリアント型
注釈
数値は ポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位で指定できます (たとえば、"2.5 in")。
このプロパティの値を設定するには、 CustomDrop メソッドを使用します。
吹き出しに明示的に設定されたドロップ値がある場合 ( つまり、DropType プロパティの値が msoCalloutDropCustom の場合) のみ、このプロパティの値は、吹き出し行のテキスト ボックスへの添付位置を正確に反映します。
例
次の使用例は、作業中の文書の最初の図形のユーザー設定のドロップ値が設定されている場合、その値が吹き出しのテキスト ボックスの縦の長さの半分よりも長いか短いかに応じて、2 つの既定のドロップ値のどちらかに置き換えます。 この使用例が動作するためには、最初の図形が吹き出しである必要があります。
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
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。