Paragraphs.DecreaseSpacing (Word)

Verringert den Abstand vor und nach Absätzen in Schritten von jeweils 6 Punkt.

Sub DecreaseParaSpacing() 
 Selection.Paragraphs.DecreaseSpacing 
End Sub