Inserting Text in a Document

Use the InsertBefore method or the InsertAfter method of the Selection object or the Range object to insert text before or after a selection or range of text. 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 method or the 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.