用VBA从word的表格中提取数据到excel中

该VBA脚本可以实现从word文档的多个表中提取数据，每个表格的信息提取到一行。

Sub word2els()
Set wdApp = CreateObject(“kwps.application”)
path_ = ThisWorkbook.Path
wdApp.Documents.Open (path_ & “” & “bbb.doc”)
wdApp.Visible = True
ThisWorkbook.Sheets(“sheet1”).Cells(1, 1) = “序号” ‘’’ 设置sheet1的第一行第一列单元格内容为“序号”
ThisWorkbook.Sheets(“sheet1”).Cells(1, 2) = “用例标识” ‘’’ 设置sheet1的第一行第一列单元格内容为“用例标识”
ThisWorkbook.Sheets(“sheet1”).Cells(1, 3) = “测试类型” ‘’’ 设置sheet1的第一行第一列单元格内容为“测试类型”

n = wdApp.ActiveDocument.Tables.Count ‘’’'有多少个表格
excel_line_no = 2
For i = 1 To n
zhs = wdApp.ActiveDocument.Tables(i).cell(2, 2) ‘’'提取第i个表格的第二行第三列单元格的内容保存到变量zhs中
Version = wdApp.ActiveDocument.Tables(i).cell(3, 5) ‘’'提取第i个表格的第三行第五列单元格的内容保存到变量Version中
env = wdApp.ActiveDocument.Tables(i).cell(3, 7) ‘’'提取第i个表格的第三行第七列单元格的内容保存到变量env中
ThisWorkbook.Sheets(“Sheet1”).Cells(excel_line_no, 1) = zhs ‘’'将变量zhs的值写入到excel的sheet1的第’excel_line_no 行第1列
ThisWorkbook.Sheets(“Sheet1”).Cells(excel_line_no, 2) = Version ‘’'将变量Version的值写入到excel的sheet1的第’excel_line_no 行第2列
ThisWorkbook.Sheets(“Sheet1”).Cells(excel_line_no, 3) = env ‘’'将变量env的值写入到excel的sheet1的第’excel_line_no 行第3列
excel_line_no = excel_line_no + 1
Next
wdApp.Application.Quit '关闭word文档
Set wdApp = Nothing '释放对象变量的内存

End Sub

word文档如下：

提取结果如下：

用VBA从word的表格中提取数据到excel中相关推荐

从Word中批量提取数据到Excel中，Word导出到Excel的利器
从Word文件中取值并导出到Excel中,有现成的工具可实现. 不过要通过工具来批量取值,Word文件中的目标字符必须有规律才行,例如都处于表格中,或者都有下划线,只要目标符合指定的规则就可以批量提取 ...
使用Python提取txt文件中的数据到excel中
详情最近在做服务组合的一些研究,从作者那获取到了QWS数据集,因此需要对数据集进行处理,获取到数据集的数据,保存在excel文件中.QWS数据集包含2000多条数据,每条数据之间的数值采用" ...
MATLAB的figure图像提取数据至excel中
filename='data.xlsx'; obj = get(gca,'children');x=get(obj, 'xdata');y=get(obj, 'ydata'); x=x(:); y=y ...
玩转excel===Excel处理txt文件中的数据，Excel中的分列处理
我的txt文件数据是这样的,目标是用第一列的数据生成图表: 现在我需要拿到pss列,用Excel的操作如下,先用Excel打开txt文档所有数据都在A列,单独拿出来第一列数字.这时候要选择分列: o ...
【Python】Python提取word表格，并保存在excel中
需求:一些常用的对word的操作和提取word的表格,并保存在excel中 pip install python-docx from docx import Document from openpyx ...
python提取excel数据-代码详解：使用Python从不同表格中提取数据
常用的表格数据存储文件格式--CSV,Microsoft Excel,Google Excel . Python通常称为粘合语言.这个名称归因于人们逐渐开发出的大量接口库和特征,也得益于广泛的使用和良 ...
python处理表格数据教程_代码详解：使用Python从不同表格中提取数据
常用的表格数据存储文件格式--CSV,Microsoft Excel,Google Excel . Python通常称为粘合语言.这个名称归因于人们逐渐开发出的大量接口库和特征,也得益于广泛的使用和良 ...
html中文本信息导出表格中,大量word填写的表格资料，如何批量提取数据到Excel表里？...
大量word填写的表格资料,要批量提取数据到Excel表里,一页对应一行,首先看一下这个word本身是什么来源的,大致可以分以下2种情况来处理. 一.网上直接生成的带html标记的word文件如一些 ...
Python办公自动化实践1：从多个excel表中提取数据并汇总到一个工作表页中,表格,抽取,sheet
Python办公自动化实践1:从多个excel表中提取数据并汇总到一个工作表页中,表格,抽取,sheet 发表时间:2020-04-26 问题:从当前目录或子目录中查询符合条件的excel表格,并从这 ...

用VBA从word的表格中提取数据到excel中

用VBA从word的表格中提取数据到excel中相关推荐

最新文章

热门文章