patbou,
Le code pour l'enregistrement semble suffire comme tu le disais mais l'erreur 1004 reste.
S'est sacrément difficile cette affaire.
Enfin je te remercie déjà pour ton aide (sa,s oublier les autres intervenants)
patbou,
Le code pour l'enregistrement semble suffire comme tu le disais mais l'erreur 1004 reste.
S'est sacrément difficile cette affaire.
Enfin je te remercie déjà pour ton aide (sa,s oublier les autres intervenants)
Tu n'oublierais pas quelque chose, ici
Manquerait pas ".xls" quelque part ?ActiveWorkbook.SaveAs Filename:= _
"D:\MES DOCUMENTS CHRISTOPHE\MA_COMPTA\CAISSE_RESTO-AMIRAL_" & Format(Date, "dd_mm_yy"), FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Si ce n'est pas ça, fais ça en deux temps
A+
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 NomFich = "D:\MES DOCUMENTS CHRISTOPHE\MA_COMPTA\CAISSE_RESTO-AMIRAL_" & _ Format(Date, "dd_mm_yy") & ".xls" ActiveWorkbook.SaveAs Filename:=NomFich
Quand tu sauve un fichier sous un autre nom c'est ce nouveau nom qui est actif, d'ou l'erreur 1004 'l'objet est introuvable' , soit tu active le nouveau nom, soit tu réouvre l'ancien classeur qui lui existe toujour mais sur le DD.Mais il y a un mais, je reçois le message d'erreur suivant :
Erreur d'exécution '1004':
la méthode 'SaveAs' de l'objet '_Worbook' à échoué
A+
Partager