DecreaseSpacing 方法

       

以 6 磅增量缩减段前和段后的间距。

expression.DecreaseSpacing

expression   必需。该表达式返回一个 Paragraphs 对象。

示例

本示例缩减段落或段落中选定内容之前或之后的间距,每运行一次该步骤,缩减 6 磅。如果段前或段后的间距都是零,则本步骤无效。

Sub DecreaseParaSpacing()
    Selection.Paragraphs.DecreaseSpacing
End Sub