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
- Messages postés
-
15433
- Date d'inscription
- dimanche 25 novembre 2007
- Statut
- Membre
- Dernière intervention
- 30 novembre 2020
1 413 > mir.kanY 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
-
15433
- Date d'inscription
- dimanche 25 novembre 2007
- Statut
- Membre
- Dernière intervention
- 30 novembre 2020
1 413 > mir.kanFichier 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+
Merci encore c'est gentil