Objet Documents (Publisher)
Représente toutes les compositions ouvertes. La collection Documents contient tous les objets Document ouverts dans Microsoft Publisher.
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.
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
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.