Word : Description de l'objet Document
II. La collection Documents
II-A. Ajout d'un document à la collection
II-B. Ouverture d'un document
II-C. Activer un document
II-D. Sauvegarder un document
II-E. Fermer un document
II-F. Connaître le nombre de documents de la collection
II. La collection Documents
La collection Documents comprend tous les documents ouverts.
Ce qui nous permet d'affirmer que le tout document Word appartient à la
collection Documents.
Il n'est pas raisonnable d'aborder l'objet Document sans mentionner la collection Documents.
II-A. Ajout d'un document à la collection
On utilisera pour l'ajout d'un nouveau document, le code suivant :
Public Sub AjouterDocument()
Dim monDoc As Document
Set monDoc = Documents.Add
End Sub
|
L'exécution de ce code aura pour effet la création d'un nouveau document basé sur le modèle normal.
On a donc bien ajouté un Document à la collection Documents.
II-B. Ouverture d'un document
L'ouverture d'un document se déroule de la même manière, on va ajouter un document
à la collection Documents.
Deux "méthodes", pour un même résultat.
Public Sub OuvrirDocument()
Documents.Open FileName:="c:\temp\doc.docx"
End Sub
|
Les arguments sont nommées avant d'être passées.
Public Sub OuvrirDocument()
Documents.Open ("c:\temp\doc.docx")
End Sub
|
Dans ce second exemple, les arguments ne sont pas nommés, ils sont simplement passés
à la fonction.
Ces deux codes vont donner le même résultat. Nommer l'agument est probablement plus commode à l'usage, surtout lorsque
le code doit être relu ou modifié.
II-C. Activer un document
Pour activer un document, on utilise la collection Documents on pointe vers un document
de cette collection pour l'activer.
Public Sub ActiverDocument()
Documents("doc.docx").activate
End Sub
|
On peut aussi adresser le document pas son index dans la collection.
Public Sub ActiverDocument()
Documents(1).activate
End Sub
|
Cette dernière méthode n'est pas la plus facile, il faut en permanence connaître la position du
document dans la collection pour pouvoir l'adresser.
II-D. Sauvegarder un document
La sauvegarde d'un document peut passer par la collection.
Public Sub SauvegardeDoc()
Documents.Save
End Sub
|
Ce code va sauvegarder toute la collection.
II-E. Fermer un document
Pour fermer un document, on passe également par la collection.
Public Sub FermerDoc()
Documents("doc.docx").Close SaveChanges:=wdSaveChanges
End Sub
|
II-F. Connaître le nombre de documents de la collection
La collection Documents Possède des méthodes et des propriétés. L'une d'elle et la
propriété Count. Cette propriété renvoie le nombre de documents contenu dans la
collection. Cette propriété est en lecture seule.
Public Sub NbreDoc()
MsgBox Documents.Count
End Sub
|
Cette procédure va nous renvoyer une boîte de message avec le nombre de documents
contenu dans la collection.
Copyright © 2007 Olivier Lebeau.
Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de
son contenu : textes, documents, images, etc. sans l'autorisation expresse de l'auteur.
Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 €
de dommages et intérêts. Droits de diffusion permanents accordés à Developpez LLC.
