Erreur d'exécution 1004 [Résolu/Fermé]

Signaler
Messages postés
178
Date d'inscription
mardi 6 septembre 2016
Statut
Membre
Dernière intervention
26 avril 2018
-
Messages postés
178
Date d'inscription
mardi 6 septembre 2016
Statut
Membre
Dernière intervention
26 avril 2018
-
Bonjour à tous,

J'ai vraiment besoin de votre aide. En fait à chaque fois que j'exécute ma macro, l'erreur suivante survient: Windows Excel ne peut pas accéder au fichier. Plusieurs raisons sont possibles.
Ci dessous le code:
    'Déclaration du répertoire de travail
Dim SRC As String
SRC = "\\mv0\Sta.SMS\Stag\Travaux\Automatisation \Documents\Développement\Futur Environnement\Archives du fichier'Plans Signés et Archivés'"
'Récupération année finalisation
AnneeDeFinalisation = DatePart("yyyy", DateDeFinalisation)
AdresseFichierArchivage = SRC & AnneeDeFinalisation & ".xlsm"
'L'ardresse du fichier d'archivage sera générée en fonction de l'année de la date de fin
Set ClasseurPlansSignesArchives = Application.Workbooks.OpenAdresseFichierArchivage)


J'ai mis en gras l'erreur.

Merci d'avance

1 réponse

Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 413
Bonjour,

    Set ClasseurPlansSignesArchives = Application.Workbooks.Open(Filename:=AdresseFichierArchivage)
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 413 >
Messages postés
178
Date d'inscription
mardi 6 septembre 2016
Statut
Membre
Dernière intervention
26 avril 2018

Re,

Y a pas que cela, vous avez deux While/Wend imbriques ce qui ne va pas puisque la ligne n'est incermentee qu'a la fin du premier et le deuixeme boucle sur la meme ligne.
Je regarde ca tout a l'heure ou demain matin suivant
Messages postés
178
Date d'inscription
mardi 6 septembre 2016
Statut
Membre
Dernière intervention
26 avril 2018

ah d'accord. Ok merci .Je regarderai aussi
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 413 >
Messages postés
178
Date d'inscription
mardi 6 septembre 2016
Statut
Membre
Dernière intervention
26 avril 2018

Bonjour,

Fichier modifie pour recherche date, par contre pour le chemin il faudrait faire une macro en enregistrement auto pour avoir le chemin de votre server afin de comparer avec le code

https://www.cjoint.com/c/FKeleXMcerf

A+
Messages postés
178
Date d'inscription
mardi 6 septembre 2016
Statut
Membre
Dernière intervention
26 avril 2018

D'accord, je fais un test et je vous fait un retour.Merci
Messages postés
178
Date d'inscription
mardi 6 septembre 2016
Statut
Membre
Dernière intervention
26 avril 2018

Bonsoir f894009,

Merci encore c'est gentil