Execl2003
Dim mg As New Merger
mg.SourcePath = "C:\ 员工工资信息.xls"
mg.Format = "Excel" '指定格式
mg.SourceTableName = "表格sheet名称" 'Execl表格左下角的名称
mg.DataTableName = "员工工资信息表" '指定接收数据的表
mg.Merge() '开始合并
Execl2007
Dim mg As New Merger
mg.SourcePath = "C:\ 员工工资信息.xlsx"
mg.Format = "Excel2007l" '指定格式
mg.SourceTableName = "表格sheet名称$" 'Execl表格左下角的名称+$
mg.DataTableName = "员工工资信息表" '指定接收数据的表
mg.Merge() '开始合并
[此贴子已经被作者于2015/12/8 8:53:02编辑过]