将“工具”菜单“选项”对话框中“兼容性”选项卡上的兼容性选项设置为新文档兼容性的默认值。
expression.MakeCompatibilityDefault
expression 必需。该表达式返回一个 Document 对象。
本示例首先为活动文档设置兼容性选项,然后将当前选项设为默认设置。
With ActiveDocument
.Compatibility(wdSuppressSpBfAfterPgBrk) = True
.Compatibility(wdExpandShiftReturn) = True
.Compatibility(wdUsePrinterMetrics) = True
.Compatibility(wdNoLeading) = False
.MakeCompatibilityDefault
End With