PasteAdjustParagraphSpacing Property

expression.PasteAdjustParagraphSpacing

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

Example

This example sets Word to automatically adjust the spacing of paragraphs when cutting and pasting selections if the option has been disabled.

Sub AdjustParaSpace()
    With Options
        If .PasteAdjustParagraphSpacing = False Then
            .PasteAdjustParagraphSpacing = True
        End If
    End With
End Sub