fichier introuvable - erreur d'exécution "1004"

[0nicey0]

Bonjour aux champions de la macro,

impossible d'avancer dans mes macros puisque à l'ouverture des fichiers à traiter j'ai le message d'erreur:
Erreur d'exécution '1004':

" O:\_Dfp\_Cdg\_PAP\" & Year(DateRetraitement) & "\Pilotage des UO et Refacturation\50-Production des factures\" _
& MoisRetraitement & "\1-Données sources\CCF\PI\ANALYSE_PI_ENCOURS.xls" introuvable

Ce qui est bizarre puisqu'à l'adresse:
O:\_Dfp\_Cdg\_PAP\2011\Pilotage des UO et facturation\50-Production des factures\03-Mars\1-Données sources\CCF\PI

le fichier ANALYSE_PI_ENCOURS existe bien.

Auriez-vous une idée ou une astuce pour résoudre ce pb?
Car si je ne peux même pas ouvrir les fichiers je peux directement ranger mes affaires et rentrer chez moi.😕

Merci mille fois d'avance pour qui aura ne serait ce que l'ébauche du début de la solution

 

[0nicey0]

Re : fichier introuvable - erreur d'exécution "1004"

Petite précision Les dates ne posent pas de pb dans ce cas

 

[tototiti2008]

Re : fichier introuvable - erreur d'exécution "1004"

Bonjour 0nicey0,

écrit le résultat de

" O:\_Dfp\_Cdg\_PAP\" & Year(DateRetraitement) & "\Pilotage des UO et Refacturation\50-Production des factures\" _
& MoisRetraitement & "\1-Données sources\CCF\PI\ANALYSE_PI_ENCOURS.xls"

dans une cellule, colle-le dans une fenêtre windows et vérifie s'il ouvre le fichier
sinon, il faudra vérifier caractère à caractère pour voir s'il y a une erreur quelque part

 

[TempusFugit]

Re : fichier introuvable - erreur d'exécution "1004"

Bonjour


C'est normal car tu n'as pas de répertoite avec ce nom:
& Year(DateRetraitement) &

Et si tu testes ceci, ca affiche quoi ?

sub test()
Msgbox  Year(DateRetraitement) 
end sub

A mon avis, tu ne dois pas avoir comme résultat : 2001 non ?

 

[kjin]

Re : fichier introuvable - erreur d'exécution "1004"

Bonjour,

" O:\_Dfp\_Cdg\_PAP\" & Year(DateRetraitement) & "\Pilotage des UO et Refacturation\50-Production des factures\" & MoisRetraitement & "\1-Données sources\CCF\PI\ANALYSE_PI_ENCOURS.xls"

Il y a 3 erreurs dans ton exemple...ou l'exemple lui même déjà est faux !!!
A+
kjin

 

[0nicey0]

Re : fichier introuvable - erreur d'exécution "1004"

Bonjour et merci de vos retours,

le chemin d'accès est un copier coller du chemin existant.

J'y ai juste modifié l'année (Year(DateRetraitement) et le mois " MoisRetraitement" qui sont déclarés en variable "Public" et renseignées comme valeur de cellules .
Year(DateRetraitement)ramène 2011
MoisRetraitement ramène 06-juin

Je ne sais plus quoi penser...

Msgbox Year(DateRetraitement) affiche 2011

 

[tototiti2008]

Re : fichier introuvable - erreur d'exécution "1004"

Bonjour Tempus, Bonjour kjin,
Re,

et as-tu essayé de coller le résultat du VBA directement dans l'adresse d'une fenêtre windows ?
Nous, on ne peut pas le faire, ça ne fonctionnera pas chez nous

 

[0nicey0]

Re : fichier introuvable - erreur d'exécution "1004"

Je ne comprends pas bien la question: s'agit-il de copier le chemin d'accès contenu dans le message d'erreur?
Si c'est bien le cas : j'ai comparé le chemin avec celui du fichier dans le réseau (ne pouvant pas copier le chemin dans le msg d'erreur) et il est identique à celui du réseau avec les bonnes dates (l'année et le mois sont les mêmes pour les deux chemins)

 

[tototiti2008]

Re : fichier introuvable - erreur d'exécution "1004"

Re,

C'est pour ça qu'il faudrait le mettre dans une cellule, comme ça tu pourrais le copier/coller

genre

Range("A1") =  "O:\_Dfp\_Cdg\_PAP\" & Year(DateRetraitement) & "\Pilotage des UO et Refacturation\50-Production des factures\" _
& MoisRetraitement & "\1-Données sources\CCF\PI\ANALYSE_PI_ENCOURS.xls"

Puis tu copies ce qu'il y a en A1 et tu le colles dans l'adresse d'une fenêtre windows

Si ça ne marche pas, c'est que ta vérification n'était pas parfaite