次の方法で共有

TextEffectFormat.RotatedChars プロパティ (Publisher)

  • [アーティクル]

指定したワードアート内の文字がワードアートの境界図形に対して 90 度回転する場合は、 msoTrue を返します。 指定したワードアート内の文字が境界図形に対して元の向きを保持している場合は 、msoFalse を返します。 値の取得と設定が可能です。

構文

式。RotatedChars

式TextEffectFormat オブジェクトを表す変数。

戻り値

MsoTriState

注釈

ワードアートの文字が横書きの場合、 RotatedChars プロパティを True に設定すると、文字は反時計回りに 90 度回転します。

ワードアートの文字が縦書きの場合、 RotatedChars プロパティを False に設定すると、文字は時計回りに 90 度回転します。

縦書きと横書きを切り替えるには、 ToggleVerticalText メソッドを使用します。

Shape オブジェクトの Flip メソッドと Rotation プロパティ、および RotationChars プロパティと ToggleVerticalText メソッドはすべて、ワードアートを表す Shape オブジェクトのテキスト フローの文字の向きと方向に影響します。 期待どおりの結果を得るために、場合によっては、これらのプロパティとメソッドを実際に組み合わせて実行し、その効果を確認する必要があります。

例

次の使用例は、テキスト Test を含むワードアートを作業中の文書に追加し、文字を反時計回りに 90 度回転させます。

Sub CreateFormatWordArt() 
 With ActiveDocument.Pages(1).Shapes _ 
 .AddTextEffect(PresetTextEffect:=msoTextEffect1, _ 
 Text:="Test", FontName:="Arial Black", FontSize:=36, _ 
 FontBold:=False, FontItalic:=False, Left:=10, Top:=10) 
 .TextEffect.RotatedChars = msoTrue 
 End With 
End Sub

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

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