Discussion :

[tedparker]

Bonjour,

j'aimerais ouvrir un fichier Excel et, sur fermeture par l'utilisateur de ce fichier, lancer automatiquement l'import des données de ce fichier ds une table ACCESS.
Cette procédure s'effectue sur événement Workbook_BeforeClose.
Voila mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
oExcelWorkBook.Close
Set oExcelWorkBook = Nothing
oExcelApp.Quit
Set oExcelApp = Nothing
DoCmd.RunSQL "DELETE FROM MaTable"
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "MaTable",MonFichier, True

C'est ici que ça plante avec l'erreur 3051 sur la ligne d'import du fichier Excel. Le fichier serait encore ouvert en mode exclusif par un autre utilisateur et dc non-importable. Je ferme pourtant bien le fichier et l'application 2 lignes au dessus.
Please help me !

[loufab]

Bonjour,

as-tu essayé un doevents juste avant ton import ?

il se peut que la commande nothing ne soit pas encore libéré par le système lors de l'import.

Cordialement,

[tedparker]

J'y avais pensé mais non c'est pas ça. Pourtant ça a l'air d'être ça le problème car, quand le bug arrive, le fichier semble fermé mais l'appli Excel est encore ouverte !

[tedparker]

Si quelqu'un a une autre solution, jsuis preneur parce que la jvois pas

[zeste]

Salut,

Ma question est un peut etre inatendu! Je ne suis pas sur d'avoir compris ou se trouve ton code dans Access?

il ya peut etre une sollution avec des propriétés ÉtatPrêt (ReadyState).
en testant la dispo du fichier. c'est 'Snapshot' je crois!

@+ zeste
Cherche un emploi assistant chef Projet (SI/MKT/Gestion) en IDF
CarpeDiem,CarpeNoctem,

[tedparker]

Euh ouais c'est inattendu parce que jvois pas du tout le rapport.
Mais si tu en vois un, tu peux expliquer c'est peut être moi qui suis trop lent.

[zeste]

Salut,

Ton plantage me rappele assez celui que j'avais quand mes instructions
étaient rédigées dans un module du classeur que je referme.
Ma question est sans importance!

@+zeste

[tedparker]

Ok ok mais la jpense pas qu'il s'agisse de ça.
Merci quand même