Aufruf einer Access-Abfrage aus Excel mittels VBA

Hallo,

ich möchte eine Abfrage in einer Access-Datenbank von Excel aus aufrufen. Kann mir jemand sagen, wie ich das anstelle?

Kann ich mit diesem Code dann auch eine Abfrage einer DB aus einer anderen DB aus aufrufen?

Danke schon mal vorab!

Dirk

Hi Dirk,

ich habe deine Anfrage so verstanden, daß du mit den Daten einer Access-Abfrage in Excel-VBA arbeiten willst.

Du schreibst im Excel-VBA eine neue Sub mit folgendem Code:

Dim wsp As Workspace
Dim db As Database
Dim rec As Recordset

Set wsp = DBEngine.Workspaces(0)
Set db = wsp.OpenDatabase(„c:\DeineDatenbank.mdb“)
Set rec = db.OpenRecordset(„DeineAbfrage“)

Außerdem hakst du unter Extras -> Verweise Microsoft DAO 3.51 (Access '97) bzw. DAO 3.6 (Access 2000 und höher) an.
Du stehst jetzt quasi auf dem ersten Datensatz der Abfrage.

Klar kannst du diesen Code auch in Access-VBA (also in einer anderen DB) verwenden, wobei du dann auch den Verweis nicht brauchst.

Wenn du noch weitere Fragen hast, schieß los.

Viele Grüße,
Julia