Transfert Table Access vers Excel qui bug

Fermé
Lulu76000 - 10 juil. 2017 à 17:33
 Utilisateur anonyme - 11 juil. 2017 à 20:42
Bonjour,


Je suis sur le pack OFFICE 2016.

J'utilise le code suivant pour transférer une table ACCESS vers EXCEL :


DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, _
"R_liste_produits", "O:\Direction\Access\calcul_trim.xlsm", , "liste_produits"


R_liste_produits = table que je souhaite exporter
O:\Direction\Access\calcul_trim.xlsm = chemin et nom de fichier de destination
liste_produits = nom de la feuille créé (remplacé) dans le fichier Excel.

Ce Code a bien fonctionné puis à commencé à bugger du jour au lendemain.

En temps normal, le fichier Excel est mis à jour (dans le répertoire la date de modification est mise à jour également).
Mais depuis quelques temps, la mise à jour ne se fait plus...
Je suis obligé d'ouvrir le fichier Excel, de supprimer les anciennes valeurs de la feuille "liste_produits" et relancer le code pour que cela fonctionne.

Quelqu'un autait-il une idée de l'origine du problème et comment le résoudre ?

Merci par avance pour vos réponses !!
A voir également:

6 réponses

Utilisateur anonyme
10 juil. 2017 à 19:18
Bonjour,

quelle est la taille du fichier Excel après import ?

Aussi, essaies ce code :

DoCmd.OutputTo acOutputQuery, "R_liste_produits", acFormatXLS, "O:\Direction\Access\calcul_trim.xlsm", True
A+
0
yg_be Messages postés 23230 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 27 septembre 2024 Ambassadeur 1 538
10 juil. 2017 à 20:21
bonsoir, as-tu plusieurs feuilles dans le fichier Excel?
0
Bonsoir HDU et yg_be et merci pour vos réponses.

je n'ai pas pu essayer ton code HDU car mon PC est resté au boulot.

cependant je peux répondre à vos questions :

Taille du fichier après export : environ 600 ko. L'export sert de source pour mettre à jour des tableaux et graphiques.
Le fichier Excel contient effectivement plusieurs feuilles.

Bonne soirée
0
Re,

600 ko, ce n'est donc pas ce souci...

Aussi, le "acSpreadsheetTypeExcel97" me semble bizarre.

Je mettrai :
acSpreadsheetTypeExcel8 pour Excel 97
9 Excel 2000
10 Excel 2002
11 Excel 2003
12 Excel 2007
14 Excel 2010
15 Excel 2013
16 Excel 2016

Tiens nous au jus.

A+
Ce n'est pas à un vieux singe qu'on apprend à faire des grimaces
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Bonsoir HDU et yg_be,

J'ai testé vos solution mais cela m'a mis des messages d'erreurs...

Finalement j'ai opté pour lier les données de ma table Access directement via le fichier Excel et cela fonctionne. Pourvu que ça dure !

Merci encore pour vos propositions et bonne soirée.
0
Utilisateur anonyme
11 juil. 2017 à 20:42
Quel message d'erreur ??

A+
0