InsertBefore Method Example

This example appends the string "Test version: " to the beginning of the title on slide one in the active presentation.

With Application.ActivePresentation.Slides(1).Shapes(1)
    .TextFrame.TextRange.InsertBefore "Test version: "
End With

This example appends the contents of the Clipboard to the beginning of the title on slide one in the active presentation.

Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
    .TextRange.InsertBefore.Paste