Range.WholeStory 方法 (Word)

扩展某一范围使其包含整个文章。

语法

expression. WholeStory

表达式是必需的。 一个代表 Range 对象的变量。

备注

下列指令在功能上是等价的（其中 myRange 是有效的 Range 对象）：

myRange.WholeStory 
myRange.Expand Unit:=wdStory

示例

以下示例扩展 myRange 使其包含整个文档，然后将该范围的字体设为 Arial。

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

以下示例扩展 myRange 使其包含文档的整个批注部分 (wdCommentsStory)，然后将该批注部分复制到新文档中。

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

另请参阅

Range 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。