主题：求助，EXCEL导入后数据丢失

报表做好了我把它导出EXCEL存到电脑上，现在要把一览表导入到Foxtable中，没有数字，还多了一行，怎么办？请帮忙改下

 

 

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

If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim mg As New Merger
    mg.SourcePath = dlg.FileName
    mg.Format = "excel" '指定格式

    mg.SourceTableName = "村级一览表2$"  
    mg.DataTableName = "村级一览表2"
    mg.Merge()

End If

此主题相关图片如下：qq图片20140612172505.jpg

版主你QQ告诉我下，我发给你，我的QQ1666357268，因为我这个东西做得复杂了，但就这个问题做一个例子我试了没问题，需要你指点帮忙