VB-Tec.de Visual Basic - Technik, FAQ, Tricks, Beispiele

Geht übers DAO.
Beispiel: Export einer Tabelle customer von Access nach Excel:

Set MyMDB = OpenDatabase(App.Path & "\MyDB.mdb")
MyDB.Execute "select * into " & _
    "[Excel 5.0;database=C:\TEST.XLS].customer " & _
    "from customer"

Exportiert die Daten in Excel 5.0-Format.
Aber Achtung: Nur ca 16000 Datensätze exportieren, da das Excelsheet sonst zu gross wird.

---

Quelle: Unbekannt.