【老婆布置的任务，跪求】如何把WORD每2页，分割成一个单独的word文件

suihuas · 发表于 2021-1-31 09:54

chendeyan126 发表于 2019-7-27 22:40
如果需要每10页、20页等任意页数拆分，可以修改如下两处代码。
以10页为例。
For i = 1 To PageCo ...

for j = 1 to 10  '增加声明一个j变量，移动10页。
               Selection.GoToNext (wdGoToPage)
            next j
这个应该放在哪个语句后面呢？

suihuas · 发表于 2021-1-31 09:55

chendeyan126 发表于 2019-7-27 22:40
如果需要每10页、20页等任意页数拆分，可以修改如下两处代码。
以10页为例。
For i = 1 To PageCo ...

for j = 1 to 10  '增加声明一个j变量，移动10页。
               Selection.GoToNext (wdGoToPage)
            next j
这个应该放在哪句语句后面呢?

413191246se · 发表于 2021-2-1 01:52

本帖最后由 413191246se 于 2021-2-1 08:01 编辑

略。。。。

		自动登录	找回密码
密码			免费注册

[求助] 【老婆布置的任务，跪求】如何把WORD每2页，分割成一个单独的word文件