Lire en anglais

Partager via


Objet Documents (Publisher)

Représente toutes les compositions ouvertes. La collection Documents contient tous les objets Document ouverts dans Microsoft Publisher.

Remarques

Utilisez la propriété Documents pour renvoyer la collection Documents .

Utilisez Ajouter méthode pour ajouter un nouveau document à la collection. Une nouvelle et visible instance de Publisher est créée lorsque la méthode Add est appelée.

Utilisez la propriété Item (index), où index est le numéro d’index ou le nom du document sous la forme d’une chaîne, pour renvoyer un objet de document spécifique.

Exemple

L’exemple suivant répertorie toutes les publications ouvertes.

Dim objDocument As Document 
Dim strMsg As String 
For Each objDocument In Documents 
 strMsg = strMsg & objDocument.Name & vbCrLf 
Next objDocument 
MsgBox Prompt:=strMsg, Title:="Current Documents Open", Buttons:=vbOKOnly

L'exemple suivant ajoute un nouveau document à la collection Documents.

Dim objDocument As Document 
Set objDocument = Documents.Add 
With objDocument 
 .LayoutGuides.Columns = 4 
 .LayoutGuides.Rows = 9 
 .ActiveView.Zoom = pbZoomWholePage 
End With

L'exemple suivant affiche le nom de la première composition ouverte.

If Documents.Count >= 1 Then 
 MsgBox Documents.Item(1).Name 
End If 


L'exemple suivant vérifie le nom de chaque document de la collection Documents. Si le nom d’un document est Sales.doc, une variable objSalesDoc objet est définie sur ce document dans la collection Documents .

Dim objDocument As Document 
Dim objSalesDoc As Document 
For Each objDocument In Documents 
 If objDocument.Name = "Sales.doc" Then 
 Set objSalesDoc = objDocument 
 End If 
Next objDocument

Méthodes

Propriétés

Voir aussi

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.