Propriété Document.Content (Word)
Renvoie un objet Range qui représente l'article principal d'un document. En lecture seule.
Syntaxe
expression. Contenu
Expression Variable qui représente un objet Document .
Remarques
Les deux instructions qui suivent sont équivalentes :
Set mainStory = ActiveDocument.Content
Set mainStory = ActiveDocument.StoryRanges(wdMainTextStory)
Exemple
Cet exemple montre comment remplacer la police du texte contenu dans le document actif par la police Arial de taille 10 (points).
Set myRange = ActiveDocument.Content
With myRange.Font
.Name = "Arial"
.Size = 10
End With
Cet exemple montre comment insérer du texte à la fin du document nommé « Changes.doc ». For Each... Prochain instruction est utilisée pour déterminer si le document est ouvert.
For Each aDocument In Documents
If InStr(LCase$(aDocument.Name), "changes.doc") Then
Set myRange = Documents("Changes.doc").Content
myRange.InsertAfter "the end."
End If
Next aDocument
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.