合并多个excel文件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

每个表格的格式一样，这个代码每次只能选择合并一个，能否 1 一次选择多个excel文件进行合并 2 每次合并只留一行空行作为间隔

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog

dlg.Filter= "Excel文件|*.xls" '设置筛选器

If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮

Dim mg As New Merger

mg.SourcePath = dlg.FileName

mg.Format = "excel" '指定格式

mg.SourceTableName = "基本信息表$" '指定要合并的表

mg.DataTableName = "基本信息表" '指定接收数据的表

mg.Merge() '开始合

End If

主题：合并多个excel文件