TextRange.Lines method (Publisher)
Returns a TextRange object that represents the specified lines.
Syntax
expression.Lines (Start, Length)
expression A variable that represents a TextRange object.
Parameters
Name | Required/Optional | Data type | Description |
---|---|---|---|
Start | Required | Long | The first line in the returned range. |
Length | Optional | Long | The number of lines to be returned. The default is 1. |
Return value
TextRange
Remarks
If Start is greater than the number of lines in the specified text, the returned range starts with the last line in the specified range.
If Length is greater than the number of lines from the specified starting line to the end of the text, the returned range contains all those lines.
Example
This example replaces the first three lines of the first shape on the first page with the specified string.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.
Feedback
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Submit and view feedback for