View.ActivePage-Eigenschaft (Publisher)

Gibt ein Page -Objekt, das die derzeit in der Microsoft Publisher-Fenster angezeigte Seite darstellt.

Syntax

Ausdruck. ActivePage

Ausdruck Eine Variable, die ein View-Objekt darstellt.

Rückgabewert

Seite

Beispiel

Dieses Beispiel speichert die aktive Seite als JPEG-Grafik. Beachten Sie, dass PathToFile durch einen gültigen Dateipfad ersetzt werden muss, damit dieses Beispiel funktioniert.

Sub SavePageAsPicture() 
 ActiveView.ActivePage.SaveAsPicture _ 
 FileName:="PathToFile" 
End Sub

In diesem Beispiel werden der aktiven Seite eine horizontale und eine vertikale Linealführungslinie hinzugefügt, die sich am Mittelpunkt der Seite überschneiden.

Sub SetRulerGuidesOnActivePage() 
 Dim intHeight As Integer 
 Dim intWidth As Integer 
 
 With ActiveView.ActivePage 
 intHeight = .Height / 2 
 intWidth = .Width / 2 
 With .RulerGuides 
 .Add Position:=intHeight, Type:=pbRulerGuideTypeHorizontal 
 .Add Position:=intWidth, Type:=pbRulerGuideTypeVertical 
 End With 
 End With 
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.