Question

我正在尝试使用DataTable.Merge（）选项

合并多个excel文件

    For Each fileName As String In Directory.GetFiles("C:\TEMP\.", "*.xls")
        Dim connectionString As String = String.Format("Provider=Microsoft.Jet.OLEDB.4.0; data source={0}; Extended Properties=""Excel 8.0;HDR=NO;IMEX=1;""", fileName)
        Dim adapter As New OleDbDataAdapter("SELECT * FROM [Sheet1$]", connectionString)
        Dim ds As New DataSet
        adapter.Fill(ds, "anyNameHere")
        Dim TempTable As DataTable
        TempTable = ds.Tables.Item("anyNameHere")
        table1.Merge(TempTable)
        MsgBox(fileName)
    Next
    DataGridView1.DataSource = table1
    MsgBox(table1.Rows.Count)

但在合并时会出现以下错误

<target>.ColumnName and <source>.ColumnName have conflicting properties: DataType property mismatch.

这是因为excel中的一列被读作文本而另一列被读为double，而两者都有数值。

为避免这种情况，我还提到连接字符串中的IMEX = 1，仍然出现此错误。

Answer 1

在合并中使用MissingSchemaAction.Ignore作为MissingSchemaAction参数

table1.Merge(TempTable, True, MissingSchemaAction.Ignore)

Answer 2

如果列是数字，请更正将该列视为文本的xls文件在合并数据时，您不希望列在结构上相同吗？

错误：<target> .ColumnName和<source />。ColumnName具有冲突的属性：DataType属性不匹配</target>

2 个答案: