Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
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.