主题：[求助]

 合并入狐表的时候是根据excel第一行的名字来合并的，但是这个时候，你的表头的名字和狐表列的名字已经是对不上了，空白是正常的。

 这种情况，你只能是手工导入数据：通过编写代码，一列一列、一行一行地对应地导入。

 只能是通过手工编码的方法导入了，因为对于这种多层表头的excel数据，狐表看来是没有操作意义的。

 1、部分列的话，就编入对应的列名就行了。

 2、如果要导入的列的格式和列名一致，就不需要分别编写代码。

 3、不能。如果要做的话，需要添加一个access临时数据库，还需要编写具体的代码去同步数据。

 改一下。

  If drb.text = "记录表A"  Then
            Dim Book As New XLS.Book(""& dlg.FileName &"")
            Dim Sheet As XLS.Sheet = Book.Sheets(0)
            Tables("记录表A").StopRedraw()
            Dim nms() As String = { "编号","姓名","中小学","学校","场地","","成绩分数","成绩输入1","成绩输入2","成绩输入4","成绩输入5","奖项","参赛项目" }
           '在“成绩分数”之前有一列“成绩时间”为表达式列，被省略

        For n As Integer = 2 To Sheet.Rows.Count -2
                Dim r As Row = Tables("记录表A").AddNew()
                For m As Integer = 0 To nms.Length - 2

                    If nms(m) <> "" Then

                        r(nms(m)) = Sheet(n,m).Value

                    End If

                Next
            Next
            Tables("记录表A").ResumeRedraw()
        End If

 不可能错吧，注意细节。

把你这句 "编号","姓名","中小学","学校","场地","","成绩分数","成绩输入1","成绩输入2","成绩输入4","成绩输入5","奖项","参赛项目" 和你的excel的列对应起来，不需要导入的列，用""代替。

 远程吧，或者你的你上传数据表。