Objet Documents (Word)
Collection de tous les objets Document actuellement ouverts dans Word.
Pour renvoyer la collection Documents, utilisez la propriété Documents. L’exemple suivant montre comment afficher les noms des documents ouverts.
For Each aDoc In Documents
aName = aName & aDoc.Name & vbCr
Next aDoc
MsgBox aName
Utilisez la méthode Add pour créer un document vide et l’ajouter à la collection Documents . L'exemple suivant montre comment créer un nouveau document basé sur le modèle Normal.
Documents.Add
Utilisez la méthode Open pour ouvrir un fichier. L'exemple suivant montre comment ouvrir le document nommé « Sales.doc ».
Documents.Open FileName:="C:\My Documents\Sales.doc"
Utilisez Documents (Index), où Index est le nom ou le numéro d’index du document pour renvoyer un seul objet Document . The following instruction closes the document named "Report.doc" without saving changes.
Documents("Report.doc").Close SaveChanges:=wdDoNotSaveChanges
Le numéro d’index représente la position du document dans la collection Documents. L’exemple suivant montre comment activer le document qui figure en première position dans la collection Documents.
Documents(1).Activate
L’exemple suivant montre comment vérifier si la collection Documents contient le document nommé « Report.doc » et ainsi déterminer s’il est ouvert. Si le document se trouve dans la collection Documents, il est activé, sinon il est ouvert.
For Each doc In Documents
If doc.Name = "Report.doc" Then found = True
Next doc
If found <> True Then
Documents.Open FileName:="C:\Documents\Report.doc"
Else
Documents("Report.doc").Activate
End If
Référence du modèle objet Word
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.