Erreur d'exécution 1004 sur sauvegarde Excel Résolu/Fermé

Question

Bonjour,

A travers un formulaire Access, je pilote un fichier Excel, et lorsque je fais la sauvegarde j’ai en fonction du chemin cette erreur :

Erreur d’exécution  ‘1004’ Fichier inaccessible

Ci après la création du Dossier sauvegarde et le chemin qui fonctionne et deux autres qui ne fonctionnent pas.

'---Initialise le dossier excel D_Dossier = CStr("ACTIVITES") & "\" & "LISTE DES ACTIVITES" & " - (" & Me.Texte124 & ") " &         CONS_SAISON_N & " " & strDate Debug.Print D_DossierACTIVITES\LISTE DES ACTIVITES - (Randonnée pédestre) 2016 - 2017 31-7-2017 11h 52m 55s'--- Sauvegarde d'Excelexcl.SaveAs Path & "\" & "DOSSIERS\DOSSIERS EXCEL\" & D_Dossier & "" & ".xlsx"
Deux Sauvegardes qui ne fonctionnent pas"C:\Users\Jacques\Documents\AAAA\BASE 2017-ORIGINAL1\ADHERENTS AAAA\Base 1 Partie applicative (Frontale)\DOSSIERS\DOSSIERS EXCEL\ACTIVITES\LISTE DES ACTIVITES - (Randonnée pédestre) 2016 - 2017 31-7-2017 11h 52m 55s.xlsx""C:\Users\Jacques\Documents\AAAA\BASE 2017-ORIGINAL1\ADHERENTS AAAA\Base 1 Partie applicative (Frontale)\DOSSIERS\DOSSIERS EXCEL\ACTIVITES\LISTE DES ACTIVITES - (Gymnastique aquatique) 2016 - 2017 31-7-2017 12h 52m 27s.xlsx"
Sauvegarde qui fonctionne"C:\Users\Jacques\Documents\AAAA\BASE 2017-ORIGINAL1\ADHERENTS AAAA\Base 1 Partie applicative (Frontale)\DOSSIERS\DOSSIERS EXCEL\ACTIVITES\LISTE DES ACTIVITES - (Danse country) 2016 - 2017 31-7-2017 12h 45m 27s.xlsx"Pouvez-vous m’aider pour résoudre mon problème ?

Salutations



Configuration: Windows / Edge 15.15063

jordane45 · Answer

Bonjour,

Juste au cas où... si tu réduis de quelques caractères le nom de tes fichiers (et ou du chemin)... est-ce que ça ne fonctionnerait pas ??

Je vois que tes deux fichiers (chemin + fichier) qui ne passent pas font plus de 220 caractères...
et celui qui passe n'en compte que 214 

Au passage.. pour nommer tes fichiers avec une date.. il serait plus judicieux d'utiliser le format timestamp.
C'est à dire.. au lieu d'écrire :
31-7-2017 11h 52m 55s
Mettre :
20170731115255
cela te fera gagner quelques caractères... et te permettra plus facilement de trier les documents dans l'explorateur de fichiers...



Si la taille n'est pas le problème... tu peux voir au niveau différence que les fichiers qui ne passent pas sont ceux avec des accents....  peut-être une piste à suivre....

castours · Answer

bonjour
Pourquoi tu ne geres pas tout depuis access qui est un logiciel de base de données, excel tableur.

jadami · Answer

Bonjour,

Merci pour ta réponse, c’était bien la longueur du chemin qui était en cause,
j’ai allégé la chaine et pour le nom du fichier j’ai limité sa longueur de cette façon :
(" & Left(Me.Texte124, 45) & ")Pour le nommage des fichiers je n’ai pas su utiliser la fonction
 timestampJe m’en suis sortie de cette façon :
'---Initialise la date    strDate = Year(Now) & "" & Month(Now) & "" & Day(Now) & "" & Hour(Now) & "" & Minute(Now) & "" & Second(Now) 
et le résultat donne cela :201783131640
Salutations

Erreur d'exécution 1004 sur sauvegarde Excel

3 réponses

Discussions similaires