Word VBA教程:Orientation属性

应用于 PageSetup对象的 Orientation属性。

返回或设置页面方向。WdOrientation,可读写。

WdOrientation 可以是下列 WdOrientation 常量之一:
wdOrientLandscape
wdOrientPortrait

expression.Orientation

expression   必需。该表达式返回一个PageSetup对象。

应用于 Range 和 Selection对象的 Orientation属性。

当启用“文字方向”功能后,返回或设置选定区域或内容中的文字方向。WdTextOrientation,可读写。

WdTextOrientation 可以是下列 WdTextOrientation 常量之一:
wdTextOrientationDownward
wdTextOrientationHorizontal
wdTextOrientationHorizontalRotatedFarEast
wdTextOrientationUpward
wdTextOrientationVerticalFarEast

expression.Orientation

expression   必需。该表达式返回以上一个对象。

应用于 TextFrame对象的 Orientation属性。

返回或设置框架内的文本的方向。MsoTextOrientation,可读写。

MsoTextOrientation 可以是下列 MsoTextOrientation 常量之一:
msoTextOrientationDownward
msoTextOrientationHorizontal
msoTextOrientationHorizontalRotatedFarEast
msoTextOrientationMixed
msoTextOrientationUpward
msoTextOrientationVertical
msoTextOrientationVerticalFarEast

expression.Orientation

expression   必需。该表达式返回一个TextFrame对象。

说明

由于您选择或安装的语言支持不同,例如,英语(美国),上述部分常量可能无法使用。

您可以设置文本框架或框架内选定区域或内容中的文本方向。有关文本框架和文本框的区别,请参阅TextFrame对象。

VBA示例

当应用于 TextFrame对象时。

本示例新建一篇文档,插入文字,然后利用这些文字创建一个文本框,再设置该文本框架的方向,使其中的文字向上倾斜。


Set mydoc = Documents.Add
Selection.TypeText "This is some text."
mydoc.Content.Select
Selection.CreateTextbox
mydoc.Shapes(1).TextFrame.Orientation = msoTextOrientationUpward

当应用于 PageSetup对象时。

本示例先改变文档“MyDocument.doc”的方向,再打印该文档。本示例然后将文档的方向恢复为纵向。


Set myDoc = Documents("MyDocument.doc")
With myDoc
    .PageSetup.Orientation = wdOrientLandscape
    .PrintOut
    .PageSetup.Orientation = wdOrientPortrait
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号