VBA
Hors ligneMarculinos Le 31/03/2009 à 17:31 Profil de Marculinos Configuration de Marculinos

Viconaute Modérateur
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...
Hors ligneAtex Le 31/03/2009 à 23:02 Profil de Atex Configuration de Atex

APVS
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\
Hors ligneJah_haile_selassie Le 06/04/2009 à 16:13 Profil de Jah_haile_selassie Configuration de Jah_haile_selassie

Refléchi
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.
--
« La connaissance s'acquiert par l'expérience, tout le reste n'est que de l'information. »
Hors ligneMarculinos Le 06/04/2009 à 20:50 Profil de Marculinos Configuration de Marculinos

Viconaute Modérateur
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.



@+
Vous avez résolu votre problème avec VIC ? Faites-le savoir sur les réseaux sociaux !
Vulgarisation-informatique.com
Cours en informatique & tutoriels