永发信息网

您好,我想问一下用EXCEL vba读取word表格中的表格数据怎么读取?

答案:3  悬赏:0  手机版
解决时间 2021-02-27 15:09
表格嵌套表格,该怎么去读取其中的指定数据?
最佳答案
如果WORD中每一页都有文字和表格。可以在excel中选择要创建word应用程序后再打开要操作的文档,再提取word内容中表格部分内容;
全部回答
可以把word中的数据复制,然后选择性粘贴到excel中,必须以文本方式。
在有word文件的文件夹中新建一个excel工作簿,打开工作簿,按alt+f11,把下面的代码复制进去,按f5执行。 代码会复制work文件的前300个字符到excel中。 sub test() dim i%, myname$, mypath$, appword as object set appword = createobject("word.application") mypath = thisworkbook.path & "\" myname = dir(mypath & "*.doc*") with activesheet .columns("a:b").clearcontents do while myname <> "" appword.documents.open filename:=mypath & myname i = i + 1 .cells(i, 1) = myname .cells(i, 2) = appword.activedocument.range(start:=0, end:=300).text appword.activedocument.close false myname = dir loop end with appword.quit set appword = nothing msgbox "已完成。" end sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
小孩老是害怕怎么办7岁了
42英寸的创维液晶电视画面不清晰是怎么回事?
最新的3D打印技术打印杯子能用吗?
买卖合同违约,定金与违约金是否退还?如果退
为什么空调出现f3
手机淘宝关键词在哪设置啊
3岁小孩感冒咳嗽可以肛门注射鱼星草注射液吗
荆州市九天出租汽车有限公司怎么去啊,有知道
安稳财富是骗子吗?听说是骗子,理财到期迟迟
在VB6中如何设置使程序运行时窗体最大化
府东西苑地址在哪,我要去那里办事
归旎护肤品怎么样
阅读下面的文字.完成下列各题. 清丽.优美的芭
连云港华诚密封件公司这个地址在什么地方,我
问道雪拥兰关开服时间是多少
推荐资讯
05年20尾数是868686的人民币价值多少
美罗与安利有什么区别?
六哥说的"对媳妇要三从四德"是哪三从四德?
好迪室内门这个地址在什么地方,我要处理点事
氧气是一种化学性质怎么样的气体
机械迷城 mx4打不开
徐州到张家港怎么坐车比较快捷??直接坐大巴
展图教育怎么样啊?
王者荣耀我的今天怎么从黄金掉到青铜了有知道
精英课堂地址在什么地方,想过去办事
日语中bogu是什么意思
徐香记地址在什么地方,想过去办事
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?