ContainingRange Property Example

This example checks the spelling in TextBox 1 and any other text in text frames that are linked to TextBox 1.

Set myStory = ActiveDocument.Shapes("TextBox 1") _
    .TextFrame.ContainingRange
myStory.CheckSpelling