Application.NewDocument-Methode (Publisher)

Artikel
04/07/2023

Gibt ein Document-Objekt zurück, das eine neue Publikation darstellt.

Syntax

Ausdruck. NewDocument (Assistent, Entwurf)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Assistent	Optional	PbWizard	Der Assistent, der zum Erstellen der neuen Publikation verwendet werden soll. Dies kann eine der PbWizard-Konstanten sein, die in der Microsoft Publisher-Typbibliothek deklariert sind. Der Standardwert ist PbWizardNone.
Entwerfen	Optional	Long	Das Design, das auf die neue Publikation angewendet werden soll.

Rückgabewert

Dokument

Beispiel

In diesem Beispiel wird eine neue Publikation erstellt und die Gestaltungsvorlage bearbeitet, sodass sie eine Seitenzahl in einem Stern in der linken oberen Ecke der Seite enthält.

Sub CreateNewPublication() 
 Dim AppPub As Application 
 Dim DocPub As Document 
 
 Set AppPub = New Publisher.Application 
 Set DocPub = AppPub.NewDocument 
 AppPub.ActiveWindow.Visible = True 
 
 With DocPub.MasterPages(1).Shapes.AddShape _ 
 (Type:=msoShape5pointStar, Left:=36, _ 
 Top:=36, Width:=50, Height:=50) 
 .Fill.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0) 
 With .TextFrame.TextRange 
 .InsertPageNumber 
 .ParagraphFormat.Alignment = pbParagraphAlignmentCenter 
 With .Font 
 .Bold = msoTrue 
 .Color.RGB = RGB(Red:=255, Green:=255, Blue:=255) 
 .Size = 12 
 End With 
 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.