TextRange.InsertSymbol method (Publisher)

Returns a TextRange object that represents a symbol inserted in place of the specified range or selection.

Syntax

expression.InsertSymbol (FontName, CharIndex)

expression A variable that represents a TextRange object.

Parameters

Name Required/Optional Data type Description
FontName Required String The name of the font that contains the symbol.
CharIndex Required Long The Unicode character for the specified symbol.

Return value

TextRange

Remarks

If you do not want to replace the range or selection, use the Collapse method before you use this method.

Example

This example inserts a double-headed arrow at the cursor.

Sub Insert Arrow() 
    ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange _ 
            .Paragraphs(Start:=1, Length:=1).Select
    With .TextFrame.TextRange 
            .InsertPageNumber 
            .Collapse Direction:= pbCollapseStart
            .InsertSymbol FontName:="Symbol", CharIndex:=171
        End With 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.