Page オブジェクト (Publisher)
文書内のページを表します。 Pages コレクションには、文書内のすべての ページ オブジェクトが含まれています。
Pages (インデックス) を使用して、1 つの Page オブジェクトを返します。
Pages オブジェクトの FindByPageID プロパティを使用して、アプリケーションに割り当てられたページ ID を使用して Page オブジェクトを見つけます。
Add メソッドを使用して新しいページを作成し、パブリケーションに追加します。
次の例では、作業中の文書の最初のページの最初の図形に新しいテキストを追加します。
Sub AddPageNumberField()
With ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange
.InsertAfter " This text is added after the existing text."
.Font.Size = 15
End With
End Sub
次の例では、作業中の文書に新しいページを追加し、ページ ID を使用してそのページを検索します。
Sub FindPage()
Dim lngPageID As Long
'Get page ID
lngPageID = ActiveDocument.Pages.Add(Count:=1, After:=1).PageID
'Use page ID to add a new shape to the page
ActiveDocument.Pages.FindByPageID(PageID:=lngPageID) _
.Shapes.AddShape Type:=msoShape5pointStar, _
Left:=200, Top:=72, Width:=50, Height:=50
End Sub
- Application
- Background
- Footer
- Header
- Height
- IgnoreMaster
- IsLeading
- IsTrailing
- IsTwoPageMaster
- IsWizardPage
- LayoutGuides
- Master
- 名前
- PageID
- PageIndex
- PageNumber
- PageType
- Parent
- ReaderSpread
- RulerGuides
- Shapes
- Tags
- WebPageOptions
- Width
- ウィザード
- XOffsetWithinReaderSpread
- YOffsetWithinReaderSpread
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。