Свойство Document.StoryRanges (Word)
Возвращает коллекцию StoryRanges , представляющую все истории в указанном документе. Только для чтения.
Синтаксис
выражение. StoryRanges
Выражение Переменная, представляющая объект Document .
Замечания
Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.
Пример
В этом примере выполняется пошаговое выполнение коллекции StoryRanges , чтобы определить, является ли wdPrimaryFooterStory частью коллекции StoryRanges .
For Each aStory In ActiveDocument.StoryRanges
If aStory.StoryType = wdEvenPagesFooterStory Then
MsgBox "Document includes an even page footer"
End If
Next aStory
В этом примере текст добавляется в основную историю заголовка, а затем отображается текст.
ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range _
.Text = "Header text"
MsgBox ActiveDocument.StoryRanges(wdPrimaryHeaderStory).Text
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.