- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何读取WORD内容到狐表中？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184897)
-- 发布时间：2023/1/13 16:32:00
-- 如何读取WORD内容到狐表中？
如何读取WORD文本内容和表格内容到狐表中？麻烦老师给个代码提示
-- 发布时间：2023/1/13 16:35:00
--
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=71352&skin=0
-- 发布时间：2023/1/16 15:46:00
--
谢谢老师，这个我看过了与我的需求不太符合。我要处理的WORD内容包括普通段落和表格内容，是想要把普通段落内容和表格内容全部提取到狐表的“第一列”中，效果如下图：
此主题相关图片如下：word.png
此主题相关图片如下：table.png
-- 发布时间：2023/1/16 16:49:00
--
可以使用tables获取表格内容
……
Dim doc = app.Documents.Open(fl)
Dim tb = Doc.Tables(1)
Dim cell As object
For Each r As object In tb.Rows
For Each cell As object in r.Cells
output.show(cell.Range.text)
Next
Next
-- 发布时间：2023/1/16 17:49:00
--
有很多表格呢？ 数量不定，如何写呢？
[此贴子已经被作者于2023/1/16 17:49:47编辑过]
-- 发布时间：2023/1/16 19:44:00
--
遍历:http://www.foxtable.com/webhelp/topics/0226.htm
msgbox(Doc.Tables.count)
For Each t As object In Doc.Tables