Office: VBA Excel-Datenimport per SQL

Guten Tag,


ich habe eine Tabelle mit Artikelnr, Umsatz, Preis. Es sind 50000 Artikelnummern vorhanden, die jeweiligen Umsätze und Preise muss ich aus einer anderen Datei herholen.


Meine Idee war es, die jew. Umsätze und Preis per SQL Kommando aus der Quelldatei zu holen und das ganze in eine Schleife zu packen (von Zeile 1 bis Zeile 50001). Allerdings dauert der Importvorgang sehr sehr lang..Kann man das nicht eleganter programmieren, sodass der Importprozess nicht um die 15 Minuten sondern nur paar Sekunden dauert?


Anbei noch ein kurzer Schnips aus meinem Code:


--connectionstring etc


For x=2 to 50001


artikel=tabelle1.cells(x,1)


SQL="Select Umsatz, Preis From [TabelleListe$] WHERE Artikelnummer=" & art


SQL ausführen...


Next x


-verbindung kappen





Vielen Dank *Smilie





LG GÜNNI

:)

 

Wieso importierst du per Schleife ???

Du importierst alle DS aus der Excel in eine Access-Tabelle. Über einen INNER Join stellst du die Beziehung her.

 

Wenn man von Performance spricht: Eine Datenübertragung von Tabelle zu Tabelle erfolgt i.d.r. am Besten über eine Abfrage im Stück über alles, nix Schleife => Bagger statt Sandschaufel.

Konkreter kann ich nicht antworten, Deine Darstellung ist zu sehr fragmentiert.

 

Das Thema hast Du ja auch im SQL-Forum schon (MySQL).
Von daher dachte ich, Du willst es direkt in eine SQL-Tabelle importieren!?

 

Hallo, danke für die Antworten *Smilie. Die Quelldatei mit den Daten ist auch eine Excel-Datei, wie muss ich dann den SQL String formulieren? Damit es auch ohne Schleife die Daten für die 50000 Artikel herholt?

 

Wie meinst du das? Würde es auch gerne ohne Schleife programmieren, aber wie? Muss ich da was in SQL-Befehl einbauen?

 

Nein, will die passenden Daten in die Zieldatei(Excel-Datei) importieren..

 

Access(-Forum)?
MySQL?

Vielleicht kannst Du dieses Gestammel mal in einem zusammenhängenden, inhaltlich vollständigen und verständlichen Text zusammenfassen ...?

Von Excel zu Excel würde man vielleicht einfach kopieren. Die Kollegen im Excelforum beherrschen dies besonders gut und weiteres.
ADODB und SQL gehen natürlich auch: ADO und Excel (1) - Kleines Vorwort und Einstieg

 

Könnte ich denn in die Where-Klausel die Spalte A mit den Artikelnummern ins Spiel bringen? Wäre dies möglich? Danke *Smilie *Smilie *Smilie

 

Hier muss ich ebs zustimmen, aus diesem zusammengewürfelten Kauderwelsch kommt keiner raus.
Und dann noch alle Anmerkungen/Fragen ignorieren .. das ist der Weg zum Erfolg. *rolleyes.gif*

 

SQL kann mit Excelspalten rein gar nichts anfangen, aber mit Feldern über ihren Namen.

 

Könnte ich denn in die Where-KLAUSEL den Spaltennamen aus der Zieldatei einfügen? Besten Dank. LG Günni

 

Ja, könnte man.

 

Danke *Smilie Habe es mit einem left join, allerdings bekomme ich am ende immer mehr Datensätze (Tabelle A * Tabelle B), obwohl ich nur Datensätze so viel wie in Tabelle A möchte, wie kann ich das formulieren? Danke

 

Nur TabelleA benutzen.