Office: (Office 2010) TransferSpreadsheet: Feldnamen ändern sich

Daher könnte man im Beispiel lt. #12 eine genügend große Zeilennummer statt 500 angeben und die leeren Datensätze mit der gezeigten WHERE-Klausel ausfiltern. Dabei sollte man für die Filterung eine Spalte auswählen, die durchgehend gefüllt ist - sonst würde sich eine ungewünschte Filterung ergeben.

Das wäre der unaufwändigste Weg, in der Ausführung rasch.

 

Danke, Thomas.
Soweit war's mir eigentlich klar, ich dachte nur, dass es vielleicht eine Möglichkeit mit einem (Zahlen)Index gibt, damit ich im SQL-Query nicht jeden Feldnamen einzeln angeben muss.

 

\@ebs17: Du hast in #12 auch den Vorschlag gemacht, die Überschriften im Excel-File anzupassen. Wäre das so viel aufwändiger? Die Lösung würde mir eigentlich besser gefallen.

 

Mir gefallen vor allem Methoden, die direkt und vor allem schnell sind. Der Zugriff auf eine Arbeitsmappe per Automation kann durchaus etwas dauern, vor allem, wenn man eine neue Instanz von Excel erstellen muss.
Zusätzlich sollte man beachten, dass Excel nicht mehrbenutzerfähig ist und man daher Mehrfachzugriffe (auch eigene) vermeiden sollte. Da sollte man dann auch ein TransferSpreadsheet oder einen SQL-Direktzugriff besser auf die dann wieder geschlossene Mappe vornehmen.
Code:

Hier würde einfach die erste Zeile im Arbeitsblatt mit gegebenen Werten überschrieben. Die Werte könnte man statt aus dem Array auch aus einer Tabelle oder einer anderen Quelle entnehmen.

 

Vielen Dank für deine Antwort und Mühe und sorry für die späte Rückmeldung - es hat leider etwas länger gedauert, bis ich alles umgesetzt habe.

Nachdem ich beide Lösungen ausprobiert habe, finde ich die Variante mit dem Verlinken auch nicht schlecht - habe dabei nur das Problem, dass die Spalten teilweise als Zahlenspalte erkannt werden und dadurch Werte verlorengehen, weil es eben nicht durchgehend Zahlen sind.

Zu der Variante mit dem Umschreiben der Zeilen: wäre es hier auch möglich, die Datei und einem anderen Namen zu speichern.
oWB.SaveAs funktioniert nicht und ich habe auch nicht herausgefunden, welche Methoden es gibt, aber vermutlich habe ich auch nur falsch gesucht. *frown.gif*

 

Sollte es aber. Für eine korrekte Anwendung schaust Du in der Excel-VBA-Hilfe nach. Vielleicht hast Du die Anweisung auch nur an falscher Stelle platziert.

Excel kennt keine Datentypen, die spaltenweit wirken, sondern ein Datentyp kann bestenfalls aus dem Zellinhalt per TYPE-Eigenschaft abgeleitet werden.

Bei einem Zugriff auf die Exceltabelle per TransferSpreadsheet oder SQL-Anweisung kommt nun als Erstes ein Registry-Eintrag für die Jet-Engine zum Tragen (TypeGuessRows in
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Excel]), nach dem nun nicht alle Zellen einer Spalte ausgewertet werden, sondern nur die Anzahl laut dem Registry-Eintrag. Wenn nun in diesen ausgewerteten Zellen nur Zahlen vorkommen, wird eben dann von einer Zahlenspalte ausgegangen, und gibt es dann doch weiter unten Texteinträge, dann entstehen Fehler.

Auswege:

- Registry-Eintrag auf 0 stellen, dann werden alle Zellen der Spalte ausgewertet. Das kann aber auf Kosten von mehr benötigter Zeit gehen.

- Die Zellen gefährdeter Spalten auf Text trimmen, lt. Vorschlag MS etwa ...
Code:

- Die Exceltabelle als CSV exportieren oder sich gleich als CSV geben lassen. In einer CSV/TXT gibt es nur Text und keine internen eigeninterpretierenden Routinen. Über Importspezifikationen kann man zudem Datentypen und Formate festlegen. Und eine solche Texttabelle ist analog zu obigen Beschreibungen auch verlinkbar und per Anfügeabfrage importierbar.

 

Du hast natürlich recht, bei einem erneuten Versuch funktioniert es. Keine Ahnung, was ich letzte Woche eingegeben habe.

Kannst du mir erklären, warum
Code:

und nicht
Code:

Grundsätzlich funktioniert ja beides, bei der Deklaration als Workbook wäre der Vorteil aber, dass die verfügbaren Methoden angezeigt werden.
Was ist der Vorteil des Objects gegenüber dem Workbook?


Danke auch für die ausführliche Erklärung bezüglich des Imports.
Den Registry-Eintrag will ich eigentlich aber nicht umstellen.
Und die beiden anderen Varianten erscheinen mir in Bezug auf die Performance schlechter, als das Öffnen der Datei und Umschreiben der Überschriften. Oder sehe ich das falsch?
(Die Möglichkeit, die Daten als csv zu erhalten, habe ich leider nicht.)

 

Die erste Dim-Anweisung wird verwendet bei Late Binding (ohne Verweis auf das Objekt), die zweite dann bei Early Binding (mit Verweis).

Vergleiche dazu auch Erläuterungen von Sascha:
Anleitung zur Programmierung unter VB/VBA

 

Vielen Dank für den Link - ich denke, ich habe es verstanden.

Danke auch nochmal für deine Hilfe bei meinen anderen Fragen.