指定したワードアートの文字がワードアートの境界図形に対して 90 度回転している場合は、 msoTrue を返します。 指定されたワードアートの文字が境界図形に対する元の向きを保持している場合は、 msoFalse を返します。 値の取得と設定が可能です。
構文
式。RotatedChars
式TextEffectFormat オブジェクトを表す変数。
戻り値
注釈
ワードアートの文字が横書きの場合、 RotatedChars プロパティを True に設定すると、文字は反時計回りに 90 度回転します。
ワードアートの文字が縦書きの場合、 RotatedChars プロパティを False に設定すると、文字は時計回りに 90 度回転します。
縦書きと横書きを切り替えるには、 ToggleVerticalText メソッドを使用します。
Shape オブジェクトの Flip メソッドと Rotation プロパティ、RotatedChars プロパティ、ToggleVerticalText メソッドはすべて、ワードアートを表す Shape オブジェクトの文字の向きとテキスト フローの方向に影響します。 期待どおりの結果を得るために、場合によっては、これらのプロパティとメソッドを実際に組み合わせて実行し、その効果を確認する必要があります。
例
この例では、[テスト] というテキストを含むワードアートをアクティブな文書に追加し、文字を反時計回りに 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 のサポートおよびフィードバックを参照してください。