Share via


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.