Paragraphs.DecreaseSpacing (Word)

Reduce el espaciado anterior y posterior de los párrafos en incrementos de seis puntos.

Sub DecreaseParaSpacing() 
 Selection.Paragraphs.DecreaseSpacing 
End Sub