Поделиться через


Метод Range.WholeStory (Word)

Расширяет диапазон, чтобы включить всю историю.

Синтаксис

выражение. 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 и обратная связь.