Pages.FindByPageID 方法 (Publisher)

會傳回代表指定的頁面識別碼號碼] 頁面的 Page 物件。 會在建立時每個頁面會自動指派唯一識別碼。 使用 PageID 屬性可傳回] 頁面上的識別碼。

語法

運算式。FindByPageID (PageID)

表達 代表 Pages 物件的變數。

參數

名稱	必要/選用	資料類型	描述
PageID	必要	Long	指定您要傳回之頁面的識別碼。 Publisher 會在建立頁面時指定這個號碼。

傳回值

頁面

註解

不同的 PageIndex 屬性，當您新增至頁面或出版物的頁面中重新排列時也不會變更 Page 物件的 PageID 屬性。 因此，使用識別碼頁碼 FindByPageID 方法可以更可靠的方式來傳回比使用] 頁面上的索引編號的 項目 方法 Pages 集合中特定 Page 物件。

範例

此範例示範如何擷取Page物件的唯一識別碼，然後使用此號碼從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 支援與意見反應。