Range.WholeStory method (Word)

Expands a range to include the entire story.

Syntax

expression. WholeStory

expression Required. A variable that represents a Range object.

Remarks

The following instructions, where myRange is a valid Range object, are functionally equivalent:

myRange.WholeStory 
myRange.Expand Unit:=wdStory

Example

This example expands myRange to include the entire story and then applies the Arial font to the range.

Set myRange = Selection.Range 
myRange.WholeStory 
myRange.Font.Name = "Arial"

This example expands myRange to include the entire comments story (wdCommentsStory) and then copies the comments into a new document.

If ActiveDocument.Comments.Count >= 1 Then 
 Set myRange = Activedocument.Comments(1).Range 
 myRange.WholeStory 
 myRange.Copy 
 Documents.Add.Content.Paste 
End If

See also

Range Object

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.