DVDNet
-
20 juin 2001 à 03:38
zen69
Messages postés584Date d'inscriptionjeudi 28 décembre 2006StatutMembreDernière intervention29 avril 2010
-
14 mai 2007 à 15:37
Alors, j'explique rapidement le but des opérations. Je voudrais envoyer le résultat d'une requète vers un fichier Excel (jusque là ça va;) puis ouvrir Xl et le fichier et effectuer des modifs à l'intérieur du fichier (ajoût de colonne, écriture de formule et tout et tout, ...)
Voilà un essai de code qui ne fonctionne pas, si vous avez une piste je serai heureux car je dois faire ça assez rapidement et je suis complètement coincé ...
Sub Tri_Facture()
Dim chemin1 As String
Dim chemin2 As String
Dim Canal As Double
Dim Data As Variant
Dim accObj As Access.Application
Set accObj = GetObject(, "Access.application")
Set fichierExcel = appExcel.Workbooks.Open(FileName:=qpTempFile)
Call macroQryReas(appExcel)
la derniere ligne fait appel a une fonction que jai fait contenant ma macro
choses a ne jamais oublier, lorsque tu copies le contenu de ta marco a partir d'Excel tu dois ajouter un point (.) devant chaque ligne, puisque tu utilises une clause With
Si tu test ta macro dans vb lui meme et que tu omis des . l'erreur ne saffichera peut-etre pas, mais un coup compiler le programme crash a 99% du temps.
BTW: sais-tu comment passer un parametre a access lors d'un DoCmd ?