Метод TextRange.InsertSymbol (Publisher)

Возвращает объект TextRange , представляющий символ, вставленный вместо указанного диапазона или выделения.

Синтаксис

выражение. InsertSymbol (FontName, CharIndex)

выражение Переменная, представляющая объект TextRange .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
FontName	Обязательный	String	Имя шрифта, содержащего символ.
CharIndex	Обязательный	Long	Символ Юникода, обозначающий указанный символ.

Возвращаемое значение

TextRange

Примечания

Если вы не хотите заменять диапазон или выделение, используйте метод Collapse перед использованием этого метода.

Пример

В этом примере в курсоре вставляется двусторонняя стрелка.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.