Office: (Office 2010) Per VBA Datentyp zu Datum ändern

Ja, was mache ich?

- Man kann sich ja mal ein Recordset auf die Exceltabelle erzeugen und dann prüfen, welche Feldnamen dann real verwendet werden:
Code:

Vielleicht hat man Glück und bekommt etwas Verwendbares.

- Alternativ verzichtet man auf Zeile 1 und Feldnamen und bleibt dann aber auch konsequent im ausgewerteten Bereich, also ohne Zeile 1.

- In Beitrag #6 verwendest Du letzteZeile. Um die sicher zu ermitteln, brauchst Du einen VBA-Zugriff auf das Excelsheet. Im gleichen Atemzug könnte man auch einen Feldnamen hineinschreiben.

Im übrigen ergeben sich durch die angesprochene Abfragelösung keine zusätzlichen Probleme gegenüber dem TransferSpreadsheet-Import.
Also Denkfrage: Wie löst Du das da?

Code:

Also die beiden Elemente aus #10 zusammenfassen.
Die genaue Konvertierung hängt selbstredend auch davon ab, in welcher Form genau der Datumstext in Excel vorliegt.

 

Nachtrag zum Eingangsbeitrag:

Das ist äußerst optimistisch. Text kann sehr viel enthalten (Buchstaben, Sonderzeichen, WhiteSpaces ...). Dies alles in Double zu überführen dürfte problematisch sein.
Der eigentliche Weg würde sein:
1) Neues Feld anlegen mit passendem Datentyp
2) Per UPDATE Inhalte konvertiert übertragen, sofern möglich
3) Ausgangsspalte löschen

 

Hey ebs17,

danke für deine Hilfen! Ich bin jetzt zu dem Ergebnis gekommen, dass ich erstmal weiter an meiner TransferSpreadsheet-Methode festhalte, da die bisher gut funktioniert hat. Evtl. werde ich an deiner noch weiter rumbasteln, bis ich das Problem der ungleichen Spalten gelöst habe.

Daher importiere ich jetzt in eine temporäre Tabelle und überführe die Daten mit Hilfe einer Anfügeabfrage und CDate, CDbl und CInt für die einzelnen Spalten in die Stammdatentabelle.
Diese habe ich jetzt so "präpariert", dass ich alle nötigen Datentypen festgelegt habe und nur noch reinkopiere in die Spalten.

Die Sache mit letzteZeile, nun, er importiert mir durch A1:W ja alles, was ich brauche. Von daher brauche ich keinen VBA-Zugriff auf die Excel-Datei. Also bis jetzt hat alles gut geklappt *biggrin.gif*