ContainingRange 属性

       

返回一个 Range 对象,该对象代表一系列带有链接文本框(包括指定文本框)的图形的整个文字部分,只读。

示例

本示例对 TextBox 1 及所有链接至 TextBox 1 的文本框的文本进行拼写检查。

Dim rngStory As Range

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

rngStory.CheckSpelling