
使用VBA获取工作表里边文本框、图形的文本数据时,在不确定文本框、图形数量的情况下,可以使用“For Each……In……Next”对工作表里面的每一个文本框、图形进行访问,然后使用“TextFrame2TextRangeText”获取里边的文本数据写入单元格。
VBA程序如下截图,shp为工作表Sheet1里边所有图形中的一个(每执行一次For循环就提取一个,不重复)。
注上图的VBA程序引用自百度经验《使用VBA提取文本框的文本数据》
大致需要以下几步:
做一个打印表,表内数据用查表公式查表获取,序号作为查表依据。
编写vba代码,让程序按照总表的数据依次自动填写表中的序号,并打印表单。
从你的,可以看出,数据是在WORD文件的表格中的,编个小程序可以解决,思路如下:
1、程序遍历指定文件下的所有DOC类文档,
2、打开找到的第一个文档,遍历文档中的每一个表格,
3、遍历表格中的每一个格子,与关键字进行比较,找出目标,其右侧的单元格中就是你要的字符串
4、程序新建EXCEL表格(这一步可以事先进行)
5、将找到的字符,输出到EXCEL表格中适当位置
6、循环直至文档未
7、循环直至文件夹中所有DOC文档全部处理完成
8----欢迎一起探讨(说明,我用的是C++,调用WORD,与EXCEL用的是ACTIVEX方法)
以上就是关于在excel中的VBA里如何使用批量读取控件(如文本框)中的数据。全部的内容,包括:在excel中的VBA里如何使用批量读取控件(如文本框)中的数据。、如何使用VBA自动生成一个excel的模板、怎么用VBA代码批量提取word中的特定数据到EXCEL等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)