Page.PageType 属性 (Publisher)
返回一个 PbPageType 常量,该常量表示页面类型。 此为只读属性。
语法
表达式。PageType
表达 一个代表 Page 对象的变量。
返回值
PbPageType
备注
PageType 属性值可以是 Microsoft 发布服务器类型库中声明的 PbPageType 常量之一。
示例
以下示例将一个形状交替添加到当前出版物中各个页面的对应角部。
Sub GetPageType()
Dim pgCount As Page
For Each pgCount In ActiveDocument.Pages
If pgCount.PageType = pbPageLeftPage Then
pgCount.Shapes.AddShape Type:=msoShapeOval, _
Left:=50, Top:=50, Width:=50, Height:=50
ElseIf pgCount.PageType = pbPageRightPage Then
pgCount.Shapes.AddShape Type:=msoShapeOval, _
Left:=512, Top:=50, Width:=50, Height:=50
End If
Next
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈