怎么用VBA进行段落格式复制

1、首先，打开Word2016。

2、然后，按键盘上的【Alt+F11】打开VBA编辑器，点击【插入】-【模块】。

3、最后，在模块里输入代码：

Sub 复制格式()

    Set dt = ActiveDocument

    dt.Paragraphs(1).Range.Select

    Selection.CopyFormat

    dt.Paragraphs(2).Range.Select

    Selection.PasteFormat

End Sub

点击F5运行，即可实现把段落1的格式复制到段落2。