InsertBefore Method Example

This example inserts the text "Hamlet" (enclosed in quotation marks) before the selection and then collapses the selection.

With Selection
    .InsertBefore Chr(34) & "Hamlet" & Chr(34) & Chr(32)
    .Collapse Direction:=wdCollapseEnd
End With

This example inserts the text "Introduction" as a separate paragraph at the beginning of the active document.

With ActiveDocument.Content
    .InsertParagraphBefore
    .InsertBefore "Introduction"
End With

This example inserts all the font names in the FontNames collection into a new document.

Documents.Add
For Each aFont In FontNames
    With Selection
        .InsertBefore aFont
        .Collapse Direction:=wdCollapseEnd
        .TypeParagraph
    End With
Next aFont