SQL-Abfrage aus Access: Ergebnisse in Excel
24.01.2007 11:48:56
Dirk
Die Suche im Forum lieferte zwar einige Ergebisse, aber die haben mir nicht so richtig weitergeholfen.
Ich habe nämlich ein Problem: Ich möchte das (ganze) Ergebnis einer Access-Abfrage in eine Excel-Tabelle schreiben. Die Abfrage (SQL-String) funktioniert gut, aber in Excel auf die Ergebnisse zugreifen kriege ich einfach nicht hin.
Der Code sieht bisher so aus:
Public
Sub Abfrageergebnis()
Set Datenbank = OpenDatabase("H:\xxxxxxxxxx.mdb")
Dim strSQL As String
strSQL = "Select Mask From......" 'langer SQL-Befehl, der auch gut funktioniert, enthält ein Feld, aber mehrere Datensätze
Cells(6, 5) = Datenbank.OpenRecordset(strSQL, dbOpenDynaset)(0) 'Abfrageergebnis, der erste Datensatz
Cells(7, 5) = 'nächster Datensatz , aber wie?
End Sub
Was ich auch mache, ich kriege immer nur den ersten Wert der Abfrage (7008), obwohl ich das Ergebnis aus mehreren Datensätzen besteht (7008; 8100; 9555 usw)
Was kann ich tun? Ich hab schon so viel rumexperimentiert, aber nix hat geklappt.
Vielen Dank im Voraus!!
Grüße, Dirk
Anzeige