Bonjour à toutes et à tous !
Je galère un peu dans le traitement de la formulation vba.
Mon but est de sauvegarder des fichiers générés pas mon code dans un dossier de sauvegarde. Cela j'y arrive.
Cependant, j'aimerais, avant que les fichiers se sauvegardent dans le dossier, exercer un "couper/coller" automatique de l'ensemble des fichiers précédents (du mois précédent par ex) , et les sauvegarder dans un dossier archive.
En gros, la démarche de sauvegarde serait :
=> Couper les anciens fichiers du dossier Sauvegarde / Coller dans Archives / Sauvegarder les nouveaux fichiers dans le dossier sauvegarde.
J'ai essayé de faire, mais ca ne marche pas : J'en suis ici
Je ne sais pas si je suis sur le bon chemin
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Dim oFSO As Scripting.FileSystemObject Dim oDrv As Scripting.Drive 'Instanciation du FSO Set oFSO = New Scripting.FileSystemObject 'Instanciation d'un objet enfant Set oDrv = oFSO.Drives(1) oFSO.MoveFile "V:\Commun7\Sauvegardes Relances Mois en cours", "V:\Commun7\Archives"
Je ne sais pas si je suis très clair, n'hésitez pas à me poser des questions pour plus d'information.
Merci !
Glnmchl
Partager