Freigeben über


TextRange.Characters-Methode (Publisher)

Gibt ein TextRange-Objekt zurück, das die angegebene Teilmenge von Textzeichen darstellt.

Syntax

Ausdruck. Zeichen (Start, Länge)

Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Start Erforderlich Long Das erste Zeichen im zurückgegebenen Bereich.
Length Optional Long The number of characters to be returned. Der Standardwert ist 1.

Rückgabewert

TextRange

Hinweise

Wenn Start größer ist als die Anzahl der Zeichen im angegebenen Text, beginnt der zurückgegebene Bereich mit dem letzten Zeichen im angegebenen Bereich.

Wenn Length größer ist als die Anzahl der Zeichen vom angegebenen Anfangszeichen bis zum Ende des Texts, enthält der zurückgegebene Bereich alle diese Zeichen.

Beispiel

Dieses Beispiel legt erst den Text für die erste Form auf der ersten Seite im aktiven Dokument und dann die Schriftart der ersten beiden Zeichen auf 15 Punkt und Fett fest.

Sub CharRange() 
 Dim rngCharacters As TextRange 
 Set rngCharacters = Application.ActiveDocument.Pages(1).Shapes(1) _ 
 .TextFrame.TextRange.InsertBefore(NewText:="Hello World.") 
 With rngCharacters.Characters(Start:=1, Length:=2).Font 
 .Size = 15 
 .Bold = msoTrue 
 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.