Méthode Application.NewDocument (Publisher)

Article
04/07/2023

Renvoie un objet Document qui représente une nouvelle composition.

Syntaxe

expression. NewDocument (Assistant, Conception)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Assistant	Facultatif	PbWizard	Assistant à utiliser pour créer la nouvelle composition. Il peut s’agir de l’une des constantes PbWizard déclarées dans la bibliothèque de type Microsoft Publisher. La valeur par défaut est pbWizardNone.
Concevoir	Facultatif	Entier long	Présentation à appliquer à la nouvelle composition.

Valeur renvoyée

Document

Exemple

Cet exemple crée une nouvelle composition et modifie la page maître pour qu’elle affiche un numéro de page dans une étoile, dans l’angle supérieur gauche.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via