Appends a string to the beginning of the specified text range. Returns a TextRange object that represents the appended text. When used without an argument, this method returns a zero-length string at the end of the specified range.
expression.InsertBefore(NewText)
expression Required. An expression that returns a TextRange object.
NewText Optional String. The text to be appended. The default value is an empty string.
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