I found the code here below in "Microsoft Learn - Title: Range.InsertAfter method (Word)"
But it seems to fail. Can someone explain? Thanks!
Code:
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."