Partager via


Propriété Document.StoryRanges (Word)

Renvoie une collection StoryRanges qui représente toutes les histoires dans le document spécifié. En lecture seule.

Syntaxe

expression. StoryRanges

Expression Variable qui représente un objet Document .

Remarques

Pour plus d’informations sur le renvoi d’un seul membre d’une collection, consultez Renvoi d’un objet à partir d’une collection.

Exemple

Cet exemple montre comment parcourir la collection StoryRanges pour savoir si wdPrimaryFooterStory fait partie de la collection StoryRanges.

For Each aStory In ActiveDocument.StoryRanges 
 If aStory.StoryType = wdEvenPagesFooterStory Then 
 MsgBox "Document includes an even page footer" 
 End If 
Next aStory

Cet exemple montre comment ajouter du texte à l'article du premier en-tête, puis afficher ce texte.

ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range _ 
 .Text = "Header text" 
MsgBox ActiveDocument.StoryRanges(wdPrimaryHeaderStory).Text

Voir aussi

Objet Document

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.