Freigeben über


TextRange.InsertSymbol-Methode (Publisher)

Gibt ein TextRange-Objekt zurück, das ein Symbol darstellt, das anstelle des angegebenen Bereichs oder der auswahl eingefügt wird.

Syntax

Ausdruck. InsertSymbol (FontName, CharIndex)

Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
FontName Erforderlich String Der Name der Schriftart, die das Symbol enthält.
CharIndex Erforderlich Long Das Unicode-Zeichen für das angegebene Symbol.

Rückgabewert

TextRange

Hinweise

Wenn Sie den Bereich oder die Auswahl nicht ersetzen möchten, verwenden Sie die Collapse-Methode , bevor Sie diese Methode verwenden.

Beispiel

In diesem Beispiel wird am Cursor ein Doppelpfeil eingefügt.

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 und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.