Réponse acceptée !
Dim ClasseurXLS As Object
Set ClasseurXLS = CreateObject("Excel.application")
ClasseurXLS.Workbooks.Open NomFichier
'tu sélectionnes la feuille (une chaine de caractère) de ton classeur où tu veux écrire
ClasseurXLS.Sheets(Nom_Feuille).Select
'et tu ecris ce que tu veux dans la bonne case de la feuille
ClasseurXLS.cells(num_ligne, num_colonne) = ta_donnee
'pour sauvegarder les modifications du classeur
ClasseurXLS.Activeworkbook.Save
'pour fermer le classeur
ClasseurXLS.Application.Quit
et normalement ça doit marcher, j'ai testé avec Access 2000 et ça roule

Ah l'informatique c'est bien quant même quand ça marche
