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.
Fügt eine Zeichenfolge an das Ende des angegebenen Textbereichs an. Gibt ein TextRange -Objekt, das den angefügten Text darstellt. Wenn diese Methode ohne Argument verwendet wird, wird am Ende des angegebenen Bereichs eine leere Zeichenfolge zurückgegeben.
Syntax
Ausdruck.
InsertAfter( _NewText_ )
Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| NewText | Optional | String | Der einzufügende Text. Der Standardwert ist eine leere Zeichenfolge. |
Beispiel
In diesem Beispiel wird an das Titelende von Folie 1 der aktiven Präsentation die Zeichenfolge ": Test version" angehängt.
With Application.ActivePresentation.Slides(1).Shapes(1)
.TextFrame.TextRange.InsertAfter ": Test version"
End With
In diesem Beispiel wird an das Titelende der ersten Folie der Inhalt der Zwischenablage angehängt.
Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
.TextRange.InsertAfter.Paste
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.