以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  批量合并  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193121)

--  作者：syttdx --  发布时间：2024/8/19 13:52:00 --  批量合并 各位专家好，我是新手，我想把一个文件夹下所有格式相同的excel日报，快速合并到一个表，怎么实现，谢谢！ [此贴子已经被作者于2024/8/19 13:53:01编辑过]

--  作者：有点蓝 --  发布时间：2024/8/19 14:12:00 --   参考：http://www.foxtable.com/webhelp/topics/0341.htm、http://www.foxtable.com/webhelp/topics/0685.htm For Each File As String In FileSys.GetFiles("C:\\xxx文件夹")    Dim mg As New Merger mg.SourcePath = File  mg.Format = "excel" \'指定格式 mg.SourceTableName = "订单" \'指定要合并的表 mg.DataTableName = "订单" \'指定接收数据的表 mg.Merge() \'开始合并 Next