TextRange.InsertAfter-Methode (Publisher)

Gibt ein TextRange-Objekt zurück, das Text darstellt, der an das Ende eines Textbereichs angefügt wird.

Syntax

Ausdruck. InsertAfter (NewText)

Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Newtext	Erforderlich	String	Der einzufügende Text.

Rückgabewert

TextRange

Beispiel

In diesem Beispiel wird die Microsoft Publisher-Buildnummer am Ende der ersten Form auf der ersten Seite der aktiven Publikation hinzugefügt. Es geht davon aus, dass die angegebene Form ein Textrahmen und keine andere Art von Form ist.

Sub AppendText() 
 With ActiveDocument.Pages(1).Shapes(1) 
 .TextFrame.TextRange.InsertAfter _ 
 NewText:="Microsoft Publisher Build : " & Build 
 End With 
End Sub

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.