Range.InsertAfter (Word)

Fügt den angegebenen Text am Ende eines Bereichs ein.

Nach Anwendung dieser Methode wird der Bereich erweitert, damit der neue Text einbezogen wird. Mit der Visual Basic-Funktion Chr und der InsertAfter -Methode fügen Sie Zeichen wie Anführungszeichen, Tabstoppzeichen und geschützte Trennstriche ein. Wenn Sie diese Methode mit einem Bereich verwenden, die sich auf einen ganzen Absatz bezieht, wird der Text nach der abschließenden Absatzmarke eingefügt (der Text wird am Anfang des nächsten Absatzes angezeigt).

InsertAfter (Text)

Text: Der einzufügende Text.

Set doc = ActiveDocument 
Set rngRange = _ 
 doc.Range(doc.Paragraphs(1).Start, _ 
 doc.Paragraphs(1).End - 1) 
rngRange.InsertAfter _ 
 " This is now the last sentence in paragraph one."