Il y a juste une chose importante, c'est qu'il faut créer le dossier de destination AVANT d'utiliser la macro

Au fait, elle sort d'où, ta ligne en erreur? elle n'est pas du tout dans ma macro...

J'avais jamais fais de VBA, je viens de tester par curiosité, ça marche impec, mais pas moyen de sauvegarder la où je veux...
J'ai remplacé "D:\essai\" par "E:\" mais les sauvegarde se font toujours sur
D:\Utilisateurs\ATEX\Documents\

Bnsoir,
Je tiens tout d'abords a remercie le forum de vulgarisation-informatique.
J'ai un petit souci, enfin un souci. J'ai envie d'enregistrer mon fichier  excel dasn un dossier différent que celui du fichier actif. La macro doit  doit pouvoir copier et enregistrer toute les heures le fichier dans un autre repertoire. Le problème c'est que j'ai une erreur au niveau du chemein. Il refuse de me le faire te me dit il s'agit d'une erreur 1004 ; soit par l'application ou par l'objet. Cependant quand je force mon fichier a s'enregistrer dans le même repertoire que le fichier courant je n'ai pas cette erreur. voici mon code




Private Sub Workbook_Open()

debut:

    Start = Timer
    intervalle = 60
    
Do While Timer < Start + intervalle
            DoEvents
Loop
Dim nom As String, chemin As String
ChDir "\\Ds-srv-hector\commun\DPAPH\Service Tarification\Sauvegarde temps réel"

    'chemin = "U:\Sauvegarde temps réel\Macro\Macro_01"
    
     fname = "TEST_SAUVEGARDE -" & Day(Date) & "-" & Month(Date) & "-" & Year(Date) & " - " & Hour(Time) & "H" & Minute(Time) & "m" & ".xls"
    ActiveWorkbook.SaveCopyAs ActiveWorkbook.Path & "\\Ds-srv-hector\commun\DPAPH\Service Tarification\Sauvegarde temps réel" & fname
GoTo debut
    
      
End Sub

Le chemin je l'ai mis en rouge.

Merci pour toute les bonnes volontés.

Le problème vient probablement du fait que le dossier spécifié n'existe pas.

La solution consisterait à faire une sous-routine de vérification d'existence de dossier.
Si le dossier n'existe pas, faire un mkdir avant de vouloir enregistrer le fichier dedans.



@+