InsertAfter Method

Applies To

TextRange object.

Description

Appends a string to the end 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.

Syntax

expression.InsertAfter(NewText)

expression Required. An expression that returns a TextRange object.

NewText Optional String. The text to be inserted. The default value is an empty string.

See Also

InsertBefore method, InsertDateTime method, InsertSlideNumber method, InsertSymbol method.

Example

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

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

This example appends the contents of the Clipboard to the end of the title on slide one.

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