Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Den Text in einem nicht verknüpften Textrahmen Text fließt zwischen verknüpften Textrahmen oder Text in einer Tabellenzelle darstellt. Das Story-Objekt ist ein Element der TextFrame- und TextRange-Objekte und der Stories-Auflistung.
Hinweise
Verwenden Sie die Story-Eigenschaft des TextFrame - oder TextRange-Objekts , um das Story-Objekt in einem Textrahmen oder Textbereich zurückzugeben.
Verwenden Sie Storys (Index), wobei Index die Nummer der Story ist, um ein einzelnes Story-Objekt zurückzugeben.
Beispiel
Dieses Beispiel gibt den Textabschnitt im ausgewählten Textbereich zurück, und wenn er sich in einem Textrahmen befindet, fügt er Text in den Textbereich ein.
Sub AddTextToStory()
With Selection.TextRange.Story
If .HasTextFrame Then .TextRange _
.InsertAfter NewText:=vbLf & "This is a test."
End With
End Sub
Dieses Beispiel bestimmt, ob der erste Abschnitt in der aktiven Publikation über einen Textrahmen verfügt, und wenn ja, werden die Absätze in der Geschichte mit einem Einzug der ersten Zeile von einem halben Zoll und einem Abstand von sechs Punkten vor jedem Absatz formatiert.
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
Eigenschaften
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.