word固定页固定单元格有特定值，则删除所在页（注：文档几百份，需批量删除）

leephy01 · 发表于 2021-7-2 16:21

本帖最后由 leephy01 于 2021-7-2 16:24 编辑

现有几百份word文档（通过数据源excel，邮件合并拆分而来）。
问题是，表中C、D列标红位置（空值或0），希望在word中该插入域所在页不显示（即删除该页）。
两个思路：1是对生成完的几百份文档批量检索插入域（指定页的指定单元格，比如tables(3).cell(1, 4)，若等于空值或0，则删除第3页）；
2是希望在邮件合并时通过对插入域的条件规则进行操作，或VBA对此进行筛分
求助版内各位大神！

数据源

指定单元格

daibao88 · 发表于 2021-7-2 17:06

方案3：备份一下数据源，分别在CD列筛选空值或0，删除行，再邮件合并

leephy01 · 发表于 2021-7-6 14:53

daibao88 发表于 2021-7-2 17:06
方案3：备份一下数据源，分别在CD列筛选空值或0，删除行，再邮件合并

这是经常用的方法，有的时候条件组合太多，显得繁复；还是求个一劳永逸的方法。

sylun · 发表于 2021-7-6 20:37

可以试在数据表中添加一辅助列用于判断，其值为C列和D列的乘积，如果判断列的值为0的行（记录）则跳过

leephy01 · 发表于 2021-7-7 08:48

以上回复皆为对插入域的条件进行限制，通过多次合并达到述求。
我希望的是一次合并得到结果。

daibao88 · 发表于 2021-7-7 10:44

leephy01 发表于 2021-7-7 08:48
以上回复皆为对插入域的条件进行限制，通过多次合并达到述求。
我希望的是一次合并得到结果。

vba数组读取数据，数组循环判断，写入word文档，可以一次完成。

leephy01 · 发表于 2021-7-7 16:22

daibao88 发表于 2021-7-7 10:44
vba数组读取数据，数组循环判断，写入word文档，可以一次完成。

请教如何操作

daibao88 · 发表于 2021-7-7 16:56

我认为，已经说得很明白了，等需要练手的同志给你写详细的代码吧。

sylun · 发表于 2021-7-9 23:14

4楼添加辅助列的方法本来就是用于纯邮件合并完成的，没必要用VBA处理。可查看一下邮件合并工具栏中的“跳过记录条件”按钮（即SkipIf域）的用法

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

[求助] word固定页固定单元格有特定值，则删除所在页（注：文档几百份，需批量删除）