Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Devuelve un objeto TextRange que representa las líneas especificadas.
Sintaxis
expresión. Líneas (Inicio, Longitud)
expresión Variable que representa un objeto TextRange .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Start | Obligatorio | Long | Primera línea del intervalo devuelto. |
| Length | Opcional | Long | Número de líneas que se devuelve. El valor predeterminado es 1. |
Valor devuelto
TextRange
Observaciones
Si Start es superior al número de líneas del texto especificado, el intervalo devuelto empieza con la última línea del intervalo especificado.
Si Length es mayor que el número de líneas desde la línea inicial especificada hasta el final del texto, el intervalo devuelto contiene todas esas líneas.
Ejemplo
En este ejemplo las tres primeras líneas de la primera forma de la primera página se reemplazan por la cadena especificada.
Sub ReplaceLines()
Dim rngText As TextRange
Set rngText = ActiveDocument.Pages(1).Shapes(1) _
.TextFrame.TextRange.Lines(Start:=1, Length:=3)
rngText.Text = "This is replacement text." & vbCrLf
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.