Compartir a través de


Método TextRange.Characters (Publisher)

Devuelve un objeto TextRange que representa el subconjunto especificado de caracteres de texto.

Sintaxis

expresión. Caracteres (Inicio, Longitud)

Expresión Variable que representa un objeto TextRange .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Start Obligatorio Long Primer carácter del intervalo devuelto.
Length Opcional Long Número de caracteres que se van a devolver. El valor predeterminado es 1.

Valor devuelto

TextRange

Comentarios

Si Start es superior al número de caracteres del texto especificado, el intervalo devuelto empieza con el último carácter del intervalo especificado.

Si Length es mayor que el número de caracteres desde el carácter inicial especificado hasta el final del texto, el intervalo devuelto contiene todos esos caracteres.

Ejemplo:

En este ejemplo se establece el texto de la primera forma de la primera página del documento activo y, a continuación, se establece la fuente de los dos primeros caracteres a 15 puntos y negrita.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.