perl - 如何在 Perl 中提取特定表格并从 MS Word 复制到 Excel？

Question

我有一个 MS Word 2003 文件，其中包含几个表格，我想提取一个特定的表格内容。例如，表格将在某些部分下，我想提取单独在第 6 部分和 下的表格内容。没有其他表格内容 ，我想将这些内容复制到带有格式的新 Excel 工作表中。

第 4 节
表数据
表数据
表数据

第 5 节
表数据
表数据
表数据

第 6 节
表数据 # 要提取并导入新 Excel 表的表数据
表数据 # 要提取并导入新 Excel 表的表数据
表数据 # 要提取并导入新 Excel 表的表数据

第 7 节
表数据
表数据
表数据

Answer 1

除非您正在考虑使用类似 antiword 的东西，否则您的起点是 Perl 模块 Win32::OLE，它作为 ActiveState Perl 的一部分安装。您需要使用 OLE 启动 Microsoft Word 应用程序，打开您的文档，然后查看文档对象的 Sections 对象，找到您的 Section 6 的 Section 对象，然后查看 Section 对象的 Range 属性的 Tables 属性, 并在其中找到您想要的 Table 对象。

复制到 Excel 工作表涉及类似的事情。

除非我有要使用的文档，否则很难编写代码示例，所以我什至不打算尝试。