SourceTableName試試加上$:
Dim mg As New Mergermg.SourcePath = "E:\销售采购物流\销售采购物流\物料清单.xls"mg.Format = "excel" '指定格式mg.SourceTableName = "物料清单$" '一些Excel文件,可能需要在表名后加上符号$才能正常导入
mg.DataTableName = "物料信息表" '指定接收数据的表mg.Merge() '开始合并