Select Case ActiveDocument.Paragraphs.SpaceAfterAuto
Case True
x = "Spacing after paragraphs is handled " _
& "automatically for all paragraphs."
Case False
x = "Spacing after paragraphs is handled " _
& "manually for all paragraphs."
Case wpsUndefined
x = "Spacing after paragraphs is handled " _
& "automatically for some paragraphs, " _
& "manually for some paragraphs."
End Select