SelectCurrentSpacing Method Example

This example selects all consecutive paragraphs that have the same line spacing and changes the line spacing to single spacing.

With Selection
    .SelectCurrentSpacing
    .ParagraphFormat.Space1
End With