主题：能否只导入部分列?

http://www.foxtable.com/help/topics/0685.htm

 

1、表名必须一致

 

2、如果要用别的表名，就先打开excel，读取表名

 

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
   
    Dim book As new XLS.Book(dlg.FileName)
   
    mg.Format = "excel" '指定格式
    mg.SourceTableName = book.Sheets(0).Name & "$" '指定要合并的表

    mg.DataTableName = "考勤机数据" '指定接收数据的表
    mg.Merge() '
   
End If

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

    Dim book As new XLS.Book(dlg.FileName)

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

    mg.SourceTableName = book.Sheets(0).Name & "$"

    mg.DataTableName = "考勤机数据" '指定接收数据的表

    mg.Merge() '   

End If

 呃，高速合并，合并的是你当前选择的表格。

 用代码可以解决不能合并的问题。

 

http://www.foxtable.com/help/topics/2334.htm