Tempo fa ho provato seguendo proprio i tuoi suggerimenti,
ma senza Excel installato mi dava errore in questo punto:

codice:
strSQL = "SELECT * INTO [Excel 8.0;Database=c:\prove\prova.xls].[Foglio1] FROM Customers"
cn.Execute strSQL
Posso sempre aver sbagliato qualcosa, ma ricordo che ci sbattei la testa un bel po' ma senza successo.

Ciao