TextRange.Characters, méthode (Publisher)

Renvoie un objet TextRange qui représente le sous-ensemble de caractères de texte spécifié.

Syntaxe

expression. Caractères (Début, Longueur)

Expression Variable qui représente un objet TextRange .

Parameters

Nom	Requis/Facultatif	Type de données	Description
Start	Obligatoire	Long	Premier caractère de la plage renvoyée.
Longueur	Facultatif	Long	Nombre de caractères à renvoyer. La valeur par défaut est 1.

Valeur renvoyée

TextRange

Remarques

Si la valeur de l’argument Début est supérieure au nombre de caractères du texte spécifié, la plage renvoyée commence par le dernier caractère de la plage spécifiée.

Si la valeur de l’argument Longueur est supérieure au nombre de caractères à partir du caractère de départ spécifié jusqu’à la fin du texte, la plage renvoyée contient tous ces caractères.

Exemple

Cet exemple définit le texte pour la première forme de la première page du document actif, puis il définit la police des deux premiers caractères à 15 points et en gras.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.