Método TextRange.Runs (PowerPoint)
Devuelve un objeto TextRange que representa el subconjunto especificado de series de texto. Un segmento de texto consta de un rango de caracteres que comparten los mismos atributos de fuente.
Sintaxis
expresión. Runs( _Start_, _Length_ )
Expresión Variable que representa un objeto TextRange .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Start | Opcional | Long | Primer segmento del intervalo devuelto. |
| Length | Opcional | Long | Número de segmentos que se devuelve. |
Valor devuelto
TextRange
Comentarios
Si se omiten Start y Length, el intervalo devuelto comienza por la primera serie y termina por el último párrafo del intervalo especificado.
Si se especifica Start, pero se omite Length, el intervalo devuelto contiene una serie.
Si se especifica Length, pero se omite Start, el intervalo devuelto comienza por la primera serie del intervalo especificado.
Si Start es mayor que el número de series del texto especificado, el intervalo devuelto comienza por la última serie del intervalo especificado.
Si Length es mayor que el número de series a partir de la serie inicial especificada hasta el final del texto, el intervalo devuelto contiene todas estas series.
Un segmento se compone de todos los caracteres que van desde el primero tras un cambio de fuente hasta el penúltimo con los mismos atributos de fuente. Por ejemplo, considere la siguiente frase:
Esta palabra en cursiva no está en negrita.
En la oración anterior, el primer segmento se compone de las palabras "Esta palabra" sólo si el espacio que hay después de "palabra" no tiene formato de cursiva (si el espacio tiene formato de cursiva, el primer segmento consta sólo de los caracteres "Esta palabr"). De igual forma, el segundo segmento contiene las palabras "en cursiva" sólo si el espacio que hay después de ellas tiene formato de cursiva.
Para obtener información sobre cómo contar o recorrer en bucle los segmentos de un intervalo de texto, vea el objeto TextRange.
Ejemplo:
En este ejemplo, se aplica formato de negrita cursiva al segundo segmento de la forma dos en la diapositiva uno de la presentación activa si previamente tiene formato de cursiva.
With Application.ActivePresentation.Slides(1).Shapes(2) _
.TextFrame.TextRange
With .Runs(2).Font
If .Italic Then
.Bold = True
End If
End With
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.