Partager via


Objet Story (Éditeur)

Représente le texte dans un cadre de texte non liée, texte se déplaçant entre les cadres de texte liée ou du texte dans une cellule de tableau. L’objet Story est membre des objets TextFrame et TextRange et de la collection Stories .

Remarques

Utilisez la propriété Story de l’objet TextFrame ou TextRange pour renvoyer l’objet Story dans un cadre de texte ou une plage de texte.

Utilisez Stories (index), où index est le numéro de l’article, pour renvoyer un objet Story individuel.

Exemple

Cet exemple montre comment renvoyer l’article dans la plage de texte sélectionnée et, s’il se trouve dans un cadre de texte, insérer du texte dans la plage de texte.

Sub AddTextToStory() 
 With Selection.TextRange.Story 
 If .HasTextFrame Then .TextRange _ 
 .InsertAfter NewText:=vbLf & "This is a test." 
 End With 
End Sub

Cet exemple montre comment déterminer si le premier article de la composition active comporte un cadre de texte et, le cas échéant, mettre en forme les paragraphes de l’article avec un retrait de première ligne d’un demi-pouce et un espacement de six points avant chaque paragraphe.

Sub StoryParagraphFirstLineIndent() 
 With ActiveDocument.Stories(1) 
 If .HasTextFrame Then 
 With .TextFrame.TextRange.ParagraphFormat 
 .FirstLineIndent = InchesToPoints(0.5) 
 .SpaceBefore = 6 
 End With 
 End If 
 End With 
End Sub

Propriétés

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.