LinesUp Property

This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.

Returns or sets a Long that represents the number of lines an initial dropped capital letter is raised above the line of text on which it exists. Read/write.

expression.LinesUp

expression   Required. An expression that returns one of the objects in the Applies To list.

Example

This example creates a custom dropped capital letter that is five lines high and raises it two lines above the line on which it exists.

  Sub RaisedDropCap()
    Dim intCount As Integer
    With ActiveDocument.Pages(1).Shapes _
            .AddTextbox(Orientation:=pbTextOrientationHorizontal, _
            Left:=100, Top:=100, Width:=100, Height:=100) _
            .TextFrame.TextRange
        For intCount = 1 To 10
            .InsertAfter NewText:="This is a test. "
        Next intCount
        With .DropCap
            .Size = 5
            .LinesUp = 2
        End With
    End With
End Sub