次の方法で共有

TextEffectFormat.RotatedChars プロパティ (Excel)

  • [アーティクル]

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

構文

式。RotatedChars

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

注釈

ワードアートに横書きテキストが含まれている場合、 RotatedChars プロパティを msoTrue に設定すると、文字は反時計方向に 90°回転します。 ワードアートに垂直なテキストが含まれている場合、 RotatedChars プロパティを msoFalse に設定すると、文字は時計方向に 90°回転します。 縦書きと横書きを切り替えるには、 ToggleVerticalText メソッドを使用します。

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

例

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

Set myDocument = Worksheets(1) 
Set newWordArt = myDocument.Shapes.AddTextEffect( _ 
 PresetTextEffect:=msoTextEffect1, Text:="Test", _ 
 FontName:="Arial Black", FontSize:=36, _ 
 FontBold:=False, FontItalic:=False, Left:=10, _ 
 Top:=10) 
newWordArt.TextEffect.RotatedChars = msoTrue

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

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