Ergebnis SQL-Abfrage in Excel-Tabelle importieren

[ClausN]

Frohes neues Jahr allen da draussen erstmal !

Neues Jahr und leider immer noch die selben Probleme! ,-)
Naja mein Probem ist folgendes:

mache mit vb ne ganz normale sqlabfrage einer Accessdatenbank und möchte diese Ergebnisse nun in einer Exceltabelle ablegen. Leider bekomme ich es einfach nicht hin die daten in die tabelle zuschreiben, eigentlich schaffe ich es nicht mal die tabelle zu öffnen.
Hoffe mal mir könnte da mal jemand die nötigen Tips oder die nötige starthilfe geben....

Bis dann...

 

[wincnc]

Hier ein Beispiel:

Verweis auf Microsoft ActiveX Data Objects 2.x Library nicht vergessen

Dim DB As ADODB.Connection

Private Sub Command1_Click()
Set DB = New ADODB.Connection

DB.CursorLocation = adUseClient
DB.Provider = "Microsoft.Jet.OLEDB.4.0"
DB.Open "C:\Deine.mdb"

DB.Execute "SELECT * INTO " & _
    "[Excel 5.0;Database=C:\TEST.XLS].Tabelle1 " & _
    "FROM DeineTabelle"
End Sub