CalloutFormat.Drop プロパティ (Publisher)
明示的に設定されたドロップ値を持つ吹き出しでは、境界ボックスの端から、引き出し線がテキスト ボックスに接する位置までの垂直距離を取得します。
AutoAttach プロパティが True に設定され、テキスト ボックスが吹き出し線の原点の左側 (吹き出しポイント) でない限り、この距離はテキスト ボックスの上部から測定されます。 値の取得のみ可能です。 読み取り専用のバリアント型 (Variant) の値。
構文
式。ドロップ
式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 のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示