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 !
Partager