直接写代码吧，参考
Dim mg As New Mergermg.SourcePath = "c:\data\销售管理.xls"mg.Format = "excel" '指定格式mg.SourceTableName = "订单$" '指定要合并的表mg.DataTableName = "订单" '指定接收数据的表mg.Merge() '开始合并
加好友 
发短信
Post By：2016/4/28 19:34:00 [只看该作者]
