Excel里提取word指定位置的内容

高个子

压缩包解压后找到汇总表，请在汇总表里设置一个按钮，用VBA解决下面的步骤
路径可能不同，我希望点击按钮以后弹出一个选择文件夹的窗口选择文件夹
第一步，判断word文件名里是不是包含审计取证单，如果包含审计取证单就把那个word打开
第二步，判断审计人员是不是黄兰英，如果是黄兰英就继续3-5步，如果不是黄兰英就关闭word回到第一步

第三步，复制被审计（调查）单位或个人，然后打开汇总表，针对C列筛选

第四步，判断对应e列是否是审计（调查）事项摘要提出的问题。下图的word选中的是提出的问题，e列字符和审计（调查）事项摘要提出的问题相似度在90%以上（可能小于1，也可能大于1，因为Excel里可能会多复制“经审计发现，***公司结算中心资金管理制度中账户管理、资金结算执行中存在以下情况：”）即可判定为相同（若有必要，可以把f列也带上匹配，f列的内容在提出问题的下面）

第五步，若第四步确实相同，则将证据提供单位或个人意见复制到对应g列，若不满足第四步或者第三步被审计（调查）单位或个人在C列找不到，则把文件名复制到k列。


ps：由于文件过大，不能把所有情况放上来，第四步可能不相同的例子：

第三步不相同的例子：

像这两种情况需要把word的文件名提取到K列，我自己来核查，K1目前是没有数据的，可以从K1开始输出找不到的文件

高个子

这个真的只能手动吗？

一执成念

写代码应该可以，就是繁琐

铁马1980

C列有重复的啊，比如那个南宁威宁投资集团有限责任公司就有4个，结果容易被覆盖。另外你说查找不到单位也写入K列，k列的第一个非空单元格吗？

xsy我可以很好

要把你的要求搞清楚，都得半天时间，这不是求助，是工作安排

tspliu

首先你把文件名判断、跳转什么的自己先写写，然后其中不会的点分别拿出来问，不然从头到尾看需求都比上班工作还烦人，很少有人愿意从头看。

高个子

铁马1980 发表于 2024-8-14 14:37
C列有重复的啊，比如那个南宁威宁投资集团有限责任公司就有4个，结果容易被覆盖。另外你说查找不到单位也写 ...

正是因为C列有重复，所以要在word中提取出问题，加上e列判断，第四步已经说明了。
查找不到单位和问题相似度<90%的都是写在k列，从第一个非空单元格开始逐个单元格依次写下来

高个子

tspliu 发表于 2024-8-14 15:57
首先你把文件名判断、跳转什么的自己先写写，然后其中不会的点分别拿出来问，不然从头到尾看需求都比上班工 ...

问了AI，即使只提取一个文件的数据，代码还是报错，我就很头疼，还不如重头写…

xlqsxl

冒个泡，我的工具可以解决你的问题：
https://club.excelhome.net/threa ... tml?_dsign=e20fcbc2

jjmysjg

高个子 发表于 2024-8-14 09:03
这个真的只能手动吗？

本人宏盲。如果你的取证单是EXCEL版本的，应当方便写代码。但是你设置的是WORD版的，可能要麻烦。
再有，审计证底稿汇总工具，已经有这个功能吧