代表頁面的背景。
註解
使用 Page 物件的 Background 屬性來傳回 PageBackground 物件。
使用 Exists 屬性判斷是否已存在指定 Page 物件的背景。
使用 Fill 屬性可傳回 FillFormat 物件。
使用 Delete 方法刪除指定頁面的背景。
範例
下列範例會建立 PageBackground 物件，並將其設定為使用中文件的第一頁的背景。
Dim objPageBackground As PageBackground
Set objPageBackground = ActiveDocument.Pages(1).Background
下列範例會建立在前一個範例。 先 PageBackground 物件建立及設定為使用中文件的第一頁的背景。 接下來，進行測試以檢查頁面是否已經存在背景。 如果沒有，則會呼叫 PageBackground 物件的 Create 方法來建立。
Dim objPageBackground As PageBackground
Set objPageBackground = ActiveDocument.Pages(1).Background
If objPageBackground.Exists = False Then
objPageBackground.Create
End If
下列範例會建立在前一個範例。 先 PageBackground 物件建立及設定為使用中文件的第一頁的背景。 接下來，進行測試以檢查頁面是否已經存在背景。 如果沒有，則會呼叫 PageBackground 物件的 Create 方法來建立。 使用 PageBackground 物件的 填滿 屬性會傳回 FillFormat 物件。 然後設定是一些可用之 FillFormat 物件的屬性。
Dim objPageBackground As PageBackground
Dim objFillFormat As FillFormat
Set objPageBackground = ActiveDocument.Pages(1).Background
If objPageBackground.Exists = False Then
objPageBackground.Create
End If
Set objFillFormat = objPageBackground.Fill
With objFillFormat
.BackColor.RGB = RGB(Red:=0, GReen:=155, Blue:=99)
.ForeColor.RGB = RGB(Red:=155, GReen:=234, Blue:=0)
.TwoColorGradient msoGradientDiagonalDown, 4
End With
下列範例會刪除使用中文件中第一頁的背景。 此範例假設指定的頁面具有現有背景。 如果頁面不包含背景，則會發生執行階段錯誤。
ActiveDocument.Pages(1).Background.Delete
方法
屬性
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。