Я пытаюсь объединить несколько файлов Excel с помощью параметра DataTable.Merge ()
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 читается как текст, а другой - как двойной, тогда как оба имеют числовые значения.
Чтобы избежать этого, я также упомянул IMEX = 1 в строке подключения, все еще получая эту ошибку.