CalloutFormat.Accent プロパティ (Publisher)
垂直のアクセント バーが吹き出し線から吹き出しテキストを区切るかどうかを示す MsoTriState 定数を設定または返します。 値の取得と設定が可能です。
構文
式。アクセント
式CalloutFormat オブジェクトを表す変数。
戻り値
MsoTriState
注釈
アクセント プロパティの値には、以下の msotristate クラス の定数のいずれかを指定できます。
定数 | 説明 |
---|---|
msoCTrue | このプロパティでは使用されません。 |
msoFalse | 吹き出しのテキストと引き出し線は、垂直の強調線で分けられません。 |
msoTriStateMixed | 戻り値だけです。 msoTrue と msoFalse を指定した図形範囲の組み合わせを示します。 |
msoTriStateToggle | 値の設定だけです。 msoTrue と msoFalse を切り替えます。 |
msoTrue | 吹き出しのテキストと引き出し線は、垂直の強調線で分割されます。 |
例
次の使用例は、作業中の文書に楕円および楕円を指す吹き出しを追加します。 吹き出しには輪郭を設定しないで、引き出し線とテキストを分ける垂直の強調線を設定します。
With ActiveDocument.Pages(1).Shapes
' Add an oval.
.AddShape Type:=msoShapeOval, _
Left:=180, Top:=200, Width:=280, Height:=130
' Add a callout.
With .AddCallout(Type:=msoCalloutTwo, _
Left:=420, Top:=170, Width:=170, Height:=40)
' Add text to the callout.
.TextFrame.TextRange.Text = "This is an oval"
' Add an accent bar to the callout.
With .Callout
.Accent = msoTrue
.Border = msoFalse
End With
End With
End With
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示