Excel) (TextEffectFormat.ToggleVerticalText 方法

將指定文字藝術師的文字流向從水平切換成垂直，反之亦然。

語法

表達。ToggleVerticalText （切換垂直文字）

詞 代表 TextEffectFormat 物件的變數。

註解

使用 ToggleVerticalText 方法會交換代表文字藝術師之 Shape 物件的 Width 和 Height 屬性值，並保持 Left 和 Top 屬性不變。

Shape 物件的 Flip 方法和 Rotation 屬性，以及 TextEffectFormat 物件的 RotatedChars 屬性和 ToggleVerticalText 方法，都會影響代表文字藝術師之 Shape 物件中的字元方向和文字流程方向。 您可能需要進行實驗，以便了解如何組合使用這些屬性和方法，取得需要的結果。

範例

此範例會將包含文字 Test 的文字藝術師新增至 myDocument ，並從水平文字流程切換 (指定文字藝術師樣式的預設值 msoTextEffect1) 垂直文字流程。

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

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。