SQL in VBA zur Access Abfrage
04.03.2004 18:25:12
arash
ich möchte mittels einer SQL Abfrage in Excel-VBA aus meiner Access DB Daten nach Excel importirien.
ich habe sowohl einen Prjojekt Verweis auf Microsoft ActiveX Data Objects 2.7 Library, als auch auf Microsoft ActiveX Data Objects Recordset 2.7 Library gesetzt und dann in Modul, ´folgenden Code hinterlegt:
Sub holen()
Dim db As Database
Dim rs As Recordset
Dim ber As String
Set db = OpenDatabase("C:\test.mdb") 'Datenquelle
Sql = "SELECT auto,typ FROM autos" 'SQL Select
Set rs = db.OpenRecordset(Sql)
Sheets("Tabellenblatt1").Cells(1, 1).CopyFromRecordset rs 'Datenziel
End Sub
Was muß ich noch zusätzlich machen?!? Fehlermeldung ist zu Zeit "Benutzerdefinioerter Typ nicht definiert".
DANKE