Método TextRange.Characters (PowerPoint)
Devuelve un objeto TextRange que representa el subconjunto especificado de caracteres de texto. Para obtener información sobre cómo contar o crear bucles en los caracteres de un intervalo de texto, vea el objeto TextRange.
Sintaxis
expresión. Characters( _Start_, _Length_ )
Expresión Variable que representa un objeto TextRange .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Start | Opcional | Long | Primer carácter del intervalo devuelto. |
| Length | Opcional | Long | Número de caracteres que se devuelve. |
Valor devuelto
TextRange
Comentarios
Si se omiten Start y Length, el intervalo devuelto comienza por el primer carácter y termina por el último párrafo del intervalo especificado.
Si se especifica Start, pero se omite Length, el intervalo devuelto contiene un carácter.
Si se especifica Length, pero se omite Start, el intervalo devuelto comienza por el primer carácter del intervalo especificado.
Si Start es mayor que el número de caracteres del texto especificado, el intervalo devuelto comienza por el último carácter del intervalo especificado.
Si Length es mayor que el número de caracteres a partir del carácter inicial especificado hasta el final del texto, el intervalo devuelto contiene todos estos caracteres.
Ejemplo:
En este ejemplo se establece el texto de la forma dos en la diapositiva uno de la presentación activa y después se convierte el segundo carácter en un subíndice con un 20 por ciento de desplazamiento.
Dim charRange As TextRange
With Application.ActivePresentation.Slides(1).Shapes(2)
Set charRange = .TextFrame.TextRange.InsertBefore("H2O")
charRange.Characters(2).Font.BaselineOffset = -0.2
End With
En este ejemplo se da formato de negrita a los caracteres subíndice de la forma dos en la diapositiva uno.
With Application.ActivePresentation.Slides(1).Shapes(2) _
.TextFrame.TextRange
For i = 1 To .Characters.Count
With .Characters(i).Font
If .Subscript Then .Bold = True
End With
Next
End With
Consulte también
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.