急！！！批量提取word指定内容到Excel

smiletwo · 发表于 2020-8-31 18:03

mzbao 发表于 2017-5-27 12:29
你试试，见附件。

大神牛牪犇

buzhenglin · 发表于 2020-9-1 11:58

发现一个问题，如果监察那里填上一个姓名，用Result(k, 6) = RegxFind(txt, "监察：(.*)", 0)这个来提取姓名时，会将其后的法律顾问及文末日期也一并提取，并不能只提取监察的姓名。盼指教！

buzhenglin · 发表于 2020-9-1 12:05

mzbao 发表于 2017-5-27 12:29
你试试，见附件。

发现一个问题，如果监察那里填上一个姓名，用Result(k, 6) = RegxFind(txt, "监察：(.*)", 0)这个来提取姓名时，会将其后的法律顾问及文末日期也一并提取，并不能只提取监察的姓名。
可能是因为姓名后面没有字符来判断结束，这种情况怎么处理呢，盼指教！

buzhenglin · 发表于 2020-9-1 13:35

Result(k, 6) = RegxFind(txt, "监察：([\u4e00-\u9fa5]+)", 0)这样就可以了

suihuas · 发表于 2020-9-4 16:59

好强，正好能用，谢谢啦

new_dawn27 · 发表于 2020-11-20 11:22

本帖最后由 new_dawn27 于 2020-11-20 11:23 编辑

2009年数据.zip (57.18 KB, 下载次数: 22)

2020-11-20 11:22 上传
点击文件名下载附件

mzbao 发表于 2017-5-27 12:29
你试试，见附件。

http://club.excelhome.net/home.php?mod=space&uid=666687
大侠您好，我用你这个帖子的方法，修改用于我个人资料整理，但是得到的结果并非完全表格数据。想请大侠指教一下。

Tommy2333 · 发表于 2021-5-25 10:19

大神，太感谢了！我先试试了！
不胜感激！！！

Jupiterss · 发表于 2021-11-6 09:34

本帖最后由 Jupiterss 于 2021-11-6 10:19 编辑

mzbao 发表于 2017-5-27 12:29
你试试，见附件。

大神您好！我也和这个有类似的需求，我试着改了一下，但之前确实没接触过vba，有些参数不知道怎么调，所以来向大神求助！！

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

[求助] 急！！！批量提取word指定内容到Excel