Share via

Объект Story (Publisher)

  • Статья

Представляет текст в несвязанном текстовом фрейме, тексте, перетекаемом между связанными текстовыми кадрами или тексте в ячейке таблицы. Объект Story является членом объектов TextFrame и TextRange , а также коллекции Stories .

Замечания

Используйте свойство Story объекта TextFrame или TextRange , чтобы вернуть объект Story в текстовом фрейме или текстовом диапазоне.

Используйте stories (index), где индекс — это номер истории, чтобы вернуть отдельный объект Story .

Пример

Этот пример возвращает историю в выделенном текстовом диапазоне и, если она находится в текстовом кадре, вставляет текст в текстовый диапазон.

Sub AddTextToStory() 
 With Selection.TextRange.Story 
 If .HasTextFrame Then .TextRange _ 
 .InsertAfter NewText:=vbLf & "This is a test." 
 End With 
End Sub

В этом примере определяется, имеет ли первый рассказ в активной публикации текстовый кадр, и если он есть, то форматирует абзацы в рассказе с отступом в пол-дюйма первой строки и шеститочечным интервалом перед каждым абзацем.

Sub StoryParagraphFirstLineIndent() 
 With ActiveDocument.Stories(1) 
 If .HasTextFrame Then 
 With .TextFrame.TextRange.ParagraphFormat 
 .FirstLineIndent = InchesToPoints(0.5) 
 .SpaceBefore = 6 
 End With 
 End If 
 End With 
End Sub

Свойства

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.