主题：Microsoft Jet 数据库引擎找不到对象'物料信息$'。请确定对象是否存在，并正确地写出它的名称和路径。

 代码改一下

Dim mg As New Merger
mg.SourcePath = "c:\物料信息.xls.xls"
mg.Format = "excel" '指定格式
mg.SourceTableName = "物料信息$" '指定要合并的表
mg.DataTableName = "表A" '指定接收数据的表
mg.Merge() '开始合并

贴出你写的代码，上传你的excel文件。

示列三

导入Excel文件：

Dim ip as New Importer
ip.SourcePath = "c:\Data\销售管理.xls" '指定数据文件
ip.SourceTableName = "订单" '指定要导入的表
ip.NewTableName ="订单" '导入后的表名
ip.Format = "Excel" '指定导入格式
ip.Import()

一些Excel文件，可能需要在表名后面加上“$”，才能正常导入，例如：

Dim ip as New Importer
ip.SourcePath = "c:\Data\销售管理.xls" '指定数据文件
ip.SourceTableName = "订单$" '指定要导入的表
ip.NewTableName ="订单" '导入后的表名
ip.Format = "Excel" '指定导入格式
ip.Import()