Inserting Text in a Document
Use the InsertAfter or InsertBefore method to insert text before or after a Selection or Range object. The following example inserts text at the end of the active document.
Sub InsertTextAtEndOfDocument()
ActiveDocument.Content.InsertAfter Text:=" The end."
End Sub
The following example inserts text before the selection.
Sub AddTextBeforeSelection()
Selection.InsertBefore Text:="new text "
End Sub
After using the InsertBefore or InsertAfter method, the Range or Selection expands to include the new text. Use the Collapse method to collapse a Selection or Range to the beginning or ending point.