Pages 对象 (Publisher)
代表出版物中的所有页面。 Pages 集合中包含所有 页 在出版物中的对象。
备注
使用 添加 将新页面添加到出版物的方法。
示例
下面的示例将新页面和新形状添加到当前出版物。
Sub AddPageAndShape()
With ActiveDocument.Pages.Add(Count:=1, After:=1)
With .Shapes.AddShape(Type:=msoShape5pointStar, _
Left:=72, Top:=72, Width:=50, Height:=50)
.Fill.ForeColor.RGB = RGB(Red:=128, Green:=50, Blue:=255)
.Line.ForeColor.RGB = RGB(Red:=75, Green:=50, Blue:=255)
End With
End With
End Sub
方法
属性
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。