求批量替换WORD中的指定页

sw4152292021-1-5152

有没有大神知道如何批量把一个word文档中的某一页替换到另一个word中的方法或者软件,页数位置都是固定的,文件名也是一样的。比方说我有500份A文档,A文档中有第一页,第二页,第三页。有300份B文档,B文档中只有第1页,我想把A文档中的第一页替换成B文档中的第1页。最终成为300份B文档的第1页,第二页,第三页。本人第一次发帖求助,若违规,及时删帖。
最新回复 (49)
  • wang200908242021-1-5
    引用2
    貌似没有这样的软件 只能人工手动
  • 没有表达清楚,不知道楼主目的是什么?
  • 楼主sw4152292021-1-5
    引用4
    wang20090824 发表于 2021-1-5 14:36
    貌似没有这样的软件 只能人工手动

    太多了,一个月差不多1000多份,有好几个月。
  • 楼主sw4152292021-1-5
    引用5
    打了个盹儿 发表于 2021-1-5 14:37
    没有表达清楚,不知道楼主目的是什么?

    比方说我有500份A文档,A文档中有第一页,第二页,第三页共3页内容。有300份B文档,B文档中只有第1页内容。我现在需要把A文档中的第一页删掉,换成B文档第1页。最终要的文档是B文档中的第1页,A文档中的第二页,第三页。
  • 娟然俊逸2021-1-5
    引用6
    sw415229 发表于 2021-1-5 14:44
    比方说我有500份A文档,A文档中有第一页,第二页,第三页共3页内容。有300份B文档,B文档中只有第1页内容 ...

    就是把A的第一页替换成B的第一页对吧,但是500份的A如何如何对应300份的B呢?
  • 楼主sw4152292021-1-5
    引用7
    娟然俊逸 发表于 2021-1-5 14:51
    就是把A的第一页替换成B的第一页对吧,但是500份的A如何如何对应300份的B呢?

    A和B的名称是一致的
  • 娟然俊逸2021-1-5
    引用8
    额 我懂你的意思了,其实A是历史数据,B是更新数据,需要把B的更新数据自动替换掉A,有多少需要替换取决于有多少B是吧,第一步 需要根据B选定需要修改的A,然后把这些A的第一页替换成B的第一页吧
  • 楼主sw4152292021-1-5
    引用9
    娟然俊逸 发表于 2021-1-5 14:55
    额 我懂你的意思了,其实A是历史数据,B是更新数据,需要把B的更新数据自动替换掉A,有多少需要替换取决于 ...

    是的,但是只需要替换第一页的数据,第二页和第三页的数据不能更改。
  • 来来2021-1-5
    引用10
    sw415229 发表于 2021-1-5 14:44
    比方说我有500份A文档,A文档中有第一页,第二页,第三页共3页内容。有300份B文档,B文档中只有第1页内容 ...

    转化成pdf然后把A的第一页删掉,B的第一页插入进去就行
  • 楼主sw4152292021-1-5
    引用11
    来来 发表于 2021-1-5 14:59
    转化成pdf然后把A的第一页删掉,B的第一页插入进去就行

    可以批量操作吗,批量转换PDF,批量插入。最后在批量转换为WORD。毕竟有很多文档,大概5千多份。
  • 6f7a8d2021-1-5
    引用12
    用vba或python吧,直接操作word就行,只是不知道你的A、B文档是否都放在相同的目录下?
  • 来来2021-1-5
    引用13
    sw415229 发表于 2021-1-5 15:03
    可以批量操作吗,批量转换PDF,批量插入。最后在批量转换为WORD。毕竟有很多文档,大概5千多份。

    好像不行,大量的没有试过
  • 楼主sw4152292021-1-5
    引用14
    6f7a8d 发表于 2021-1-5 15:04
    用vba、python都能解决,只是不知道你的A、B文档是否都放在相同的目录下?

    这个没有问题,可以放到同一个文件夹中
  • 6f7a8d2021-1-5
    引用15
    sw415229 发表于 2021-1-5 15:06
    这个没有问题,可以放到同一个文件夹中

    那你电脑上的office能使用vba吗?一般都可以的,不行的话就只能使用python或其它语言写程序了
  • 楼主sw4152292021-1-5
    引用16
    6f7a8d 发表于 2021-1-5 15:19
    那你电脑上的office能使用vba吗?一般都可以的,不行的话就只能使用python或其它语言写程序了

    可以使用VBA,请问有代码吗。
  • 6f7a8d2021-1-5
    引用17
    sw415229 发表于 2021-1-5 15:32
    可以使用VBA,请问有代码吗。

    打开文件,运行宏,按提示输入文件所在目录的完整路径,运行完成后到输出目录查看就行了
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw 提取码:skrr
  • 楼主sw4152292021-1-6
    引用18
    6f7a8d 发表于 2021-1-5 21:09
    打开文件,运行宏,按提示输入文件所在目录的完整路径,运行完成后到输出目录查看就行了
    链接:https://p ...

    宏的名称是test,A文件夹为input1,B文件夹为input2,输出文件为output。抱歉,显示任务完成,但是output文件夹里没有任何文件。是我哪里操作错误吗
  • 6f7a8d2021-1-6
    引用19
    sw415229 发表于 2021-1-6 07:28
    宏的名称是test,A文件夹为input1,B文件夹为input2,输出文件为output。抱歉,显示任务完成,但是output ...

    运行过程中没有错误提示吗?有的话贴出来看看,没有的话,可能是目录下的文件出了问题,检查一下两个目录下的文件是否都是doc或docx格式文件
  • 楼主sw4152292021-1-6
    引用20
    6f7a8d 发表于 2021-1-6 08:44
    运行过程中没有错误提示吗?有的话贴出来看看,没有的话,可能是目录下的文件出了问题,检查一下两个目录 ...

    刚才我看过了,是我格式错误了,我已经修改了格式,目前的情况是修改了18个文件就停止了,是我后面的格式还有错误吗
  • 6f7a8d2021-1-6
    引用21
    sw415229 发表于 2021-1-6 09:10
    刚才我看过了,是我格式错误了,我已经修改了格式,目前的情况是修改了18个文件就停止了,是我后面的格式 ...

    程序是根据文件后缀名(doc、docx)来判断是否word文件的,你的文件格式是什么?一般来说,用vba的话对word的格式兼容应该是最好的
  • 楼主sw4152292021-1-6
    引用22
    6f7a8d 发表于 2021-1-6 09:19
    程序是根据文件后缀名(doc、docx)来判断是否word文件的,你的文件格式是什么?一般来说,用vba的话对word ...

    目前格式是docx,我全部修改为doc试试
  • 6f7a8d2021-1-6
    引用23
    sw415229 发表于 2021-1-6 09:22
    目前格式是docx,我全部修改为doc试试

    我测试的时候docx格式是可以的,可能是office设置的问题,你在word里把 文件-选项--高级选项-兼容性选项的值改为“所有新文档”再运行宏试试
  • 楼主sw4152292021-1-6
    引用24
    6f7a8d 发表于 2021-1-6 09:40
    我测试的时候docx格式是可以的,可能是office设置的问题,你在word里把 文件-选项--高级选项-兼容性选项 ...

    大神,已经可以了,但是现在出现一个新的问题,删除的不干净,第一页的数据会有1/4存留在第二页。
  • 6f7a8d2021-1-6
    引用25
    sw415229 发表于 2021-1-6 09:55
    大神,已经可以了,但是现在出现一个新的问题,删除的不干净,第一页的数据会有1/4存留在第二页。

    是A文档第一页删除的不干净吗?可能是复制时word页面内容改变导致删除范围错误。你试着在每一页末尾加上分页符,看还会不会有这个问题?或者你发几个样板文档过来,我再具体调整
  • 楼主sw4152292021-1-6
    引用26
    6f7a8d 发表于 2021-1-6 10:23
    是A文档第一页删除的不干净吗?可能是复制时word页面内容改变导致删除范围错误。你试着在每一页末尾加上 ...

    我先试试分页符吧,不过也只能在B文档中修改。
  • 6f7a8d2021-1-6
    引用27
    sw415229 发表于 2021-1-6 10:27
    我先试试分页符吧,不过也只能在B文档中修改。

    或许是页面设置的问题。你复制一份A文档到其它位置,然后在这个文档里新建一个宏,代码就是原来的test宏代码,执行,看看情况如何?
  • 楼主sw4152292021-1-6
    引用28
    6f7a8d 发表于 2021-1-6 10:43
    或许是页面设置的问题。你复制一份A文档到其它位置,然后在这个文档里新建一个宏,代码就是原来的test宏 ...

    大神,已经解决了,目前就有一个小问题了。最后一页有一页空白页。
  • 6f7a8d2021-1-6
    引用29
    sw415229 发表于 2021-1-6 10:56
    大神,已经解决了,目前就有一个小问题了。最后一页有一页空白页。

    那原先的A文档或B文档最后一页是空白吗?不是的话,可以尝试用代码删除
  • 楼主sw4152292021-1-6
    引用30
    6f7a8d 发表于 2021-1-6 11:18
    那原先的A文档或B文档最后一页是空白吗?不是的话,可以尝试用代码删除

    原来的A或B文档最后一页都不是空白页。我看output生成的文档,标题上都有空行,原有数据是没有空行的,是不是和这个有关系,有些文档是没有空白页的,如果用代码删除,会不会误删没有空白页的数据。
  • 6f7a8d2021-1-6
    引用31
    sw415229 发表于 2021-1-6 11:25
    原来的A或B文档最后一页都不是空白页。我看output生成的文档,标题上都有空行,原有数据是没有空行的,是 ...

    word复制粘贴时另起一行了,导致标题之上多出一个空行,稍等,我试着调整一下代码
  • 6f7a8d2021-1-6
    引用32
    sw415229 发表于 2021-1-6 11:25
    原来的A或B文档最后一页都不是空白页。我看output生成的文档,标题上都有空行,原有数据是没有空行的,是 ...

    代码更新了,你试试看
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw 提取码:skrr
  • 楼主sw4152292021-1-6
    引用33
    6f7a8d 发表于 2021-1-6 11:46
    代码更新了,你试试看
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw 提取码:skrr 复制这段内 ...

    大神,不行,运行到第6个文件就卡哪里,我看了之前的记录,就是从那里开始有空白页的。怎么给你传文件啊。最好是我把文件传给你看看
  • 6f7a8d2021-1-6
    引用34
    sw415229 发表于 2021-1-6 13:22
    大神,不行,运行到第6个文件就卡哪里,我看了之前的记录,就是从那里开始有空白页的。怎么给你传文件啊 ...

    文件通过百度云或其它网盘分享出来就行了
  • 6f7a8d2021-1-6
    引用35
    sw415229 发表于 2021-1-6 13:22
    大神,不行,运行到第6个文件就卡哪里,我看了之前的记录,就是从那里开始有空白页的。怎么给你传文件啊 ...

    可能是这次代码里加入了检测空白页功能的缘故,遇到空白页程序会给出提示并暂停,需要手动点击继续。但空白提示过多的话也麻烦,要不我把提示去掉你再试试
  • 楼主sw4152292021-1-6
    引用36
    6f7a8d 发表于 2021-1-6 14:37
    可能是这次代码里加入了检测空白页功能的缘故,遇到空白页程序会给出提示并暂停,需要手动点击继续。但空 ...

    链接: https://pan.baidu.com/s/1pPrcV8NLhmeSYaYHoN_jaA 提取码: 4jpt
  • y2y2021-1-6
    引用37
    6f7a8d 发表于 2021-1-6 14:37
    可能是这次代码里加入了检测空白页功能的缘故,遇到空白页程序会给出提示并暂停,需要手动点击继续。但空 ...

    大哥厉害,我想请问一下IDM嗅探IE网页内容下载总是接受不到数据,时间久了就会提示,iWebOA下载失败,出现异常:与服务器的链接被重置。
  • 6f7a8d2021-1-6
    引用38
    sw415229 发表于 2021-1-6 14:40
    链接: https://pan.baidu.com/s/1pPrcV8NLhmeSYaYHoN_jaA 提取码: 4jpt 复制这段内容后打开百度网盘手机A ...

    好了,试试吧。
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw
    提取码:skrr
  • 楼主sw4152292021-1-6
    引用39
    6f7a8d 发表于 2021-1-6 15:41
    好了,试试吧。
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw
    提取码:skrr

    不行啊,大神。运行了4次,第一次72个文档就停了,第二次110处停了,第三次130处停了,第四次48处停了。
  • 6f7a8d2021-1-6
    引用40
    sw415229 发表于 2021-1-6 15:59
    不行啊,大神。运行了4次,第一次72个文档就停了,第二次110处停了,第三次130处停了,第四次48处停了。

    似乎是vba本身稳定性的问题。稍微改进了一下,不过可能效果不大。如果急用的话可以先用分批处理(如每次处理60个文档),不急的话。我试着用多线程改进一下vba的效率,不过可能会久一点
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw
    提取码:skrr
  • 楼主sw4152292021-1-6
    引用41
    6f7a8d 发表于 2021-1-6 17:25
    sw415229 发表于 2021-1-6 15:59
    不行啊,大神。运行了4次,第一次72个文档就停了,第二次110处停了,第三 ...

    大神,我不着急,麻烦你了。
  • 6f7a8d2021-1-7
    引用42
    sw415229 发表于 2021-1-6 17:36
    大神,我不着急,麻烦你了。

    先做出了一个稳定版,应该不会再发生中途卡死的情况了(注意,程序运行时不要做复制粘贴之类的操作,否则可能导致生成的word内容错乱)
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw 提取码:skrr
  • 楼主sw4152292021-1-7
    引用43
    6f7a8d 发表于 2021-1-7 15:24
    先做出了一个稳定版,应该不会再发生中途卡死的情况了(注意,程序运行时不要做复制粘贴之类的操作,否则 ...

    大神,运行没有问题了,不过还是最后一页会随机有空白页。
  • 6f7a8d2021-1-7
    引用44
    sw415229 发表于 2021-1-7 15:54
    大神,运行没有问题了,不过还是最后一页会随机有空白页。

    那些有空白页的文档是不是最末尾的内容都是表格?
    不知道偶尔一些空白页是不是可以忽略,如果不能忽略的话我再试着修复一下
  • 楼主sw4152292021-1-7
    引用45
    6f7a8d 发表于 2021-1-7 16:12
    那些有空白页的文档是不是最末尾的内容都是表格?
    不知道偶尔一些空白页是不是可以忽略,如果不能忽略的 ...

    修复一下吧,主要是文档太多。麻烦你了
  • 6f7a8d2021-1-7
    引用46
    sw415229 发表于 2021-1-7 16:16
    修复一下吧,主要是文档太多。麻烦你了

    我这边测试了几次,暂时没有看到有空白页的。不知道你那边是哪几个文档会有空白的,在你发出来的那些文件里有吗?
  • 6f7a8d2021-1-7
    引用47
    sw415229 发表于 2021-1-7 15:54
    大神,运行没有问题了,不过还是最后一页会随机有空白页。

    最后一页空白页是全部生成的文档都有,还是只有一部分有?
  • 6f7a8d2021-1-7
    引用48
    sw415229 发表于 2021-1-7 16:16
    修复一下吧,主要是文档太多。麻烦你了

    好了,试试吧:WORD_replace(稳定加强版)
    链接:https://pan.baidu.com/s/1TPd2Jgwu44kj4g1YSWw5vw 提取码:skrr
  • spere6月前
    引用49
    用户 sw415229 發表於 2021-1-7 16:16修復一下吧,主要是文檔太多。麻煩你瞭好瞭,試試吧:WORD_replace(穩定加強版)鏈接:https://pan.baidu.com/s/1T ...
    大神有没得最新的链接阿,之前的失效了。
  • 游客
    51
返回