TextFrame.ContainingRange (Word)

Gibt ein Range -Objekt zurück, das den gesamten Textabschnitt in einer Reihe von Formen mit verknüpften Textrahmen darstellt, zu denen der angegebene Textrahmen gehört.

Dim rngStory As Range 
 
Set rngStory = ActiveDocument.Shapes("TextBox 1") _ 
 .TextFrame.ContainingRange 
 
rngStory.CheckSpelling