Publisher.TextFrame.Story.md

title	keywords	f1_keywords	api_name	ms.assetid	ms.date	ms.localizationpriority
TextFrame.Story property (Publisher)	vbapb10.chm3866663	vbapb10.chm3866663	Publisher.TextFrame.Story	7bbe0967-83aa-745b-ad13-8a7dfe61811c	06/15/2019	medium

TextFrame.Story property (Publisher)

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

[!includeSupport and feedback]