Edit

Share via

TextFrame.Story property (Publisher)

  • Article

Returns a Story object that represents the story properties in a text range.

Syntax

expression.Story

expression A variable that represents a TextFrame object.

Example

This example returns the story in the selected text range, and if it is in a text frame, inserts text into the text range.

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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.