如何批量提取word中两个标题间的文字内容到excel中

abc2048 · 发表于 2019-5-1 18:05

各位大神，哪位能帮我把多个word文件中的“公司未来发展的展望”这一标题下的内容提取出来，复制在同一个excel表格中，excel表格中最好是第一列显示word的文件名，第二列是相应提取出来的内容，一一对应。求大家帮帮忙，万分感谢！

zmj9151 · 发表于 2019-5-1 21:14

__________________

小花鹿 · 发表于 2019-5-2 11:32

利用正则提取就行了

abc2048 · 发表于 2019-5-15 18:55

zmj9151 发表于 2019-5-1 21:14
__________________

您好，感谢您提供了代码。我在自己电脑上运行的时候发现会跳出弹窗“对象变量或with块变量未设置”，然后调试了一下，“ wdApp.Selection.MoveDown wdLine”这句话被标记了，我百度了一下也没有找到相关解决方法，请问一下，我运行的时候这句话出错了，应该要怎么解决呢？麻烦了！谢谢大神的帮忙！

daibao88 · 发表于 2019-5-15 20:13

本帖最后由 daibao88 于 2019-5-15 20:17 编辑

我测试了一下，代码没有问题。先选择工程—引用—找到 Microsoft Word X.0 Object Library打钩 x.0为14.0或16.0等，与安装的office版本有关而不同。

abc2048 · 发表于 2019-5-18 10:50

daibao88 发表于 2019-5-15 20:13
我测试了一下，代码没有问题。先选择工程—引用—找到 Microsoft Word X.0 Object Library打钩 x.0为1 ...

我看了一下Microsoft Word X.0 Objec Library本身是打钩的，但是程序运行仍然存在上面所述的问题，我也不知道怎么回事。。。很忧心。。请问您是直接excel打开，代码复制过去就可以运行的吗？

daibao88 · 发表于 2019-5-18 21:51

office2010测试可以，你还是在vbe界面导出文件，导入文件吧。不知道你怎么复制的，复制test部分就行。

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

[求助] 如何批量提取word中两个标题间的文字内容到excel中