次の方法で共有

MasterPages.FindByPageID メソッド (Publisher)

  • [アーティクル]

指定したページの ID 番号を持つページを表す Page オブジェクトを返します。 各ページが自動的に割り当てられる一意の ID 番号が作成されたとき。 PageID プロパティを使用して、ページの ID 番号を取得します。

構文

式。FindByPageID (PageID)

式MasterPages オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
PageID 必須 Long 返すページの ID 番号を指定します。 Publisher では、この番号がページの作成時に割り当てられます。

戻り値

Page

注釈

PageIndex プロパティとは異なりにページを追加するか、文書内のページを再配置すると、 Page オブジェクトの PageID プロパティは変更されません。 したがって、ページの ID 番号を持つ FindByPageID メソッドを使用して、 ページ の特定のオブジェクト コレクションから取得、 ページ ページのインデックス番号を持つ Item メソッドを使用するよりも信頼性の高い方法です。

例

この例では、 Page オブジェクトの一意の ID 番号を取得し、この番号を使用して、 Pages コレクションから Page オブジェクトを返し、新しい図形をページに追加する方法を示します。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。