返回一个 Range 对象,该对象代表一系列带有链接文本框(包括指定文本框)的图形的整个文字部分,只读。
本示例对 TextBox 1 及所有链接至 TextBox 1 的文本框的文本进行拼写检查。
Dim rngStory As Range Set rngStory = ActiveDocument.Shapes("TextBox 1") _ .TextFrame.ContainingRange rngStory.CheckSpelling