Freigeben über


Page.PageType-Eigenschaft (Publisher)

Gibt eine PbPageType-Konstante zurück, die den Seitentyp darstellt. Schreibgeschützt.

Syntax

Ausdruck. PageType

Ausdruck Eine Variable, die ein Page-Objekt darstellt.

Rückgabewert

PbPageType

HinwBemerkungeneise

Der Wert der PageType-Eigenschaft kann eine der in der Microsoft Publisher-Typbibliothek deklarierten PbPageType-Konstanten sein.

Beispiel

Dieses Beispiel fügt abwechselnd an den Ecken in der aktiven Publikation eine Form hinzu.

Sub GetPageType() 
 Dim pgCount As Page 
 For Each pgCount In ActiveDocument.Pages 
 If pgCount.PageType = pbPageLeftPage Then 
 pgCount.Shapes.AddShape Type:=msoShapeOval, _ 
 Left:=50, Top:=50, Width:=50, Height:=50 
 ElseIf pgCount.PageType = pbPageRightPage Then 
 pgCount.Shapes.AddShape Type:=msoShapeOval, _ 
 Left:=512, Top:=50, Width:=50, Height:=50 
 End If 
 Next 
End Sub

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.