|
Hallo liebe Community,
ich habe folgendes Problem und hoffe jemand kann mir weiterhelfen.
Kurzer Sachverhalt: Es sollen Daten aus Excel-Datei 1in (geschlossene Datei) in eine zweite Datei Excel-Datei 2 überführt werden. Das funktioniert soweit gut. Realisert habe ich das über die integrierte Datenbank. Die Zellinhalte werden aus der Datebank in ein Array geladen und von dort in die zweite Datei eingefügt.
Das Problem hierbei liegt bei den verschiedenen Datentypen (Integer und Strings). Wird z.B. erst ein Integer-Wert in das Array geschrieben, so wird der zweite Wert, wenn es ein String ist nicht mehr übermittlet.
Hat dafür jemand eine Lösung?
Hier die verwendete Datenbank-Abfrage:
Connection.Open "Provider=MSDASQL.1;DSN=Excel Files;DBQ=" & pfad & ";HDR=NO';"
Query = "SELECT * FROM [Blatt1$] "
rs.Open Query, Connection
Worksheets("SQLDaten").Range("A8").CopyFromRecordset rs
rs.Close
|