Freigeben über

PageBackground-Objekt (Publisher)

  • Artikel

Stellt den Hintergrund einer Seite dar.

Hinweise

Verwenden Sie die Background-Eigenschaft eines Page-Objekts , um ein PageBackground-Objekt zurückzugeben.

Verwenden Sie die Exists-Eigenschaft , um zu bestimmen, ob für das angegebene Page-Objekt bereits ein Hintergrund vorhanden ist.

Verwenden Sie die Fill -Eigenschaft, um ein FillFormat -Objekt zurückzugeben.

Verwenden Sie die Delete-Methode , um einen Hintergrund für die angegebene Seite zu löschen.

Beispiel

Das folgende Beispiel erstellt ein PageBackground -Objekt und platziert es in den Hintergrund der ersten Seite des aktiven Dokuments.

Dim objPageBackground As PageBackground 
Set objPageBackground = ActiveDocument.Pages(1).Background

Das folgende Beispiel basiert auf dem vorherigen Beispiel. Zuerst wird ein PageBackground -Objekt erstellt und für den Hintergrund der ersten Seite des aktiven Dokuments festgelegt. Als Nächstes wird ein Test durchgeführt, um zu überprüfen, ob bereits ein Hintergrund für die Seite vorhanden ist. Wenn nicht, wird eine erstellt, indem die Create-Methode des PageBackground-Objekts aufgerufen wird.

Dim objPageBackground As PageBackground 
Set objPageBackground = ActiveDocument.Pages(1).Background 
If objPageBackground.Exists = False Then 
 objPageBackground.Create 
End If

Das folgende Beispiel basiert auf dem vorherigen Beispiel. Zuerst wird ein PageBackground -Objekt erstellt und für den Hintergrund der ersten Seite des aktiven Dokuments festgelegt. Als Nächstes wird ein Test durchgeführt, um zu überprüfen, ob bereits ein Hintergrund für die Seite vorhanden ist. Wenn nicht, wird eine erstellt, indem die Create-Methode des PageBackground-Objekts aufgerufen wird. Ein FillFormat -Objekt wird mithilfe der Fill -Eigenschaft des PageBackground -Objekts zurückgegeben. Klicken Sie dann werden einige der verfügbaren Eigenschaften des FillFormat -Objekts festgelegt.

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

Das folgende Beispiel löscht den Hintergrund der ersten Seite im aktiven Dokument. In diesem Beispiel wird davon ausgegangen, dass die angegebene Seite über einen vorhandenen Hintergrund verfügt. Wenn die Seite keinen Hintergrund enthält, tritt ein Laufzeitfehler auf.

ActiveDocument.Pages(1).Background.Delete

Methoden

Eigenschaften

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.