Share via

NextParagraphStyle Property [Publisher 2003 VBA Language Reference]

  • Article

Returns or sets a String that represents the paragraph style that follows the specified text style when a user presses ENTER. Read/write.

expression.NextParagraphStyle

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

Example

This example creates a new text style and specifies that the text style following the new text style is the Normal style.

Sub CreateNewTextStyle()
    Dim styNew As TextStyle
    Dim fntStyle As Font

    Set styNew = ActiveDocument.TextStyles.Add(StyleName:="Heading 1")
    Set fntStyle = styNew.Font

    With fntStyle
        .Name = "Tahoma"
        .Bold = msoTrue
        .Size = 15
    End With

    With styNew
        .Font = fntStyle
        .NextParagraphStyle = "Normal"
    End With
End Sub

Applies to | TextStyle Object