word如何复制一百页内容？

Question

如题所述

Answer 1

1、首先，在打开要复制的Word文档，点击顶部菜单工具中的视图，再点击右侧宏下面的查看宏。

2、然后，在弹出的宏的窗口中输入复制100，再点击创建的按钮。

3、然后，在新的窗口中输入下面的代码：

Sub 复制100()

Selection.copy

Selection.PasteAndFormat (wdFormatOriginalFormatting)

For i = 1 To 99

Selection.InsertBreak Type:=wdPageBreak

Selection.PasteAndFormat (wdFormatOriginalFormatting)

Next i

End Sub

4、之后，关闭步骤3中的新窗口，返回到Word的编辑主界面全选第一页的内容，再点击宏下面的查看宏。

5、如图所示，在弹出的查看宏的窗口选中刚刚创建成功的复制100，再点击右侧的运行按钮。

6、最后，等运行完后就可以看到word中成功的进行了相同内容一百页的复制。