Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Enregistrement automatique d'un fichier dans un dossier ?????

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion lmylvc
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
L

lmylvc

XLDnaute Occasionnel
Bonjour à tous 😀

Etant une bille en VBA, je me permets de vous solliciter afin
de savoir comment enregistrer automatiquement
-un fichier à son ouverture, "exemple :nom = "test"
- dans un dossier précis exemple :G\enregistrement\etc....
En le nomant à l'identique mais en le faisant précédé de la date du jour au
format AA_MM_JJ_test

J'ai bien touvé un bout de code, mais celui-ci enregistre le fichier tout les x minutes
Private Sub Workbook_Open()

debut:

Start = Timer
intervalle = 300

Do While Timer < Start + intervalle
DoEvents ' Donne le contrôle à d'autres processus.
Loop

ChDir "C:\22\"

fname = "TEST - " & Day(Date) & "-" & Month(Date) & "-" & Year(Date) & " - " & Hour(Time) & "H" & Minute(Time) & "m" & Second(Time) & "s"

ActiveWorkbook.SaveAs Filename:=fname

GoTo debut

End Sub

Merci d'avance pour votre aide

Vincent
 
Dernière édition:
Trier par date Trier par votes
Re : Enregistrement automatique d'un fichier dans un dossier ?????

Salut cCmarchepas

Mon pb vient peut être du fait que je sois sur un réseau
mais j'ai réalisé lexportation de la copie vers c:\temp et cela n'a pas fonctionné
Est-ce que mon code est correctement inscrit, quelqu'un peutil le vérifier

Merci

Vincent
 

Pièces jointes

  • explic.jpg
    34.4 KB · Affichages: 62
  • explic.jpg
    34.4 KB · Affichages: 68
  • explic.jpg
    34.4 KB · Affichages: 70
Vote positif 0 Vote négatif
Re : Enregistrement automatique d'un fichier dans un dossier ?????

Bonjour tout le monde, lmylvc

par hasard il ne te manquerait pas le début de ta procédure à savoir :

Private Sub Workbook_Open() pour déclencher la sauvegarde à l'ouverture du classeur

ou bien

Private Sub Workbook_BeforeClose(Cancel As Boolean) pour la déclencher juste avant la fermeture ?

Bon après-midi à tous !

P.S.
Salut Camarchepas tu m'as devancé 🙂
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Enregistrement automatique d'un fichier dans un dossier ?????

Re , Bonjour Alyrio,

Et oui , l'on ce croise sur ce fil sans voir ce que l'autre poste , alors fatalement , lol.

Oui , tu as tout à fait raison , l'un ou l'autre , tout dépend de quand il veut faire la sauvegarde , voir les 2 aprés tout lol
 
Vote positif 0 Vote négatif
Re : Enregistrement automatique d'un fichier dans un dossier ?????

Re,

Tiens je ne sais pas pour toi mais j'ai des horaires de messages qui date d'aujourd'hui 11h40 soit 2 heures de moins. C'est étrange non 😕








 
Vote positif 0 Vote négatif
Re : Enregistrement automatique d'un fichier dans un dossier ?????

Très bon code (dont je n'ai pas encore trouvé d'utilité particulière mais que je met dans un coin de ma bibliotheque)
J'ai ajouté le nom du fichier en automatique ainsi que le nom de l'utilisateur (c'est plus simple si l'on travaille sur un espace partagé). Cependant ca risque de vite couter cher en stockage 🙂

Code: 
Private Sub Workbook_Open()
'A insérer dans "This Workbook"
'A chaque ouverture il enregistre une sauvegarde du fichier dans la destination choisie au format: Nom d'utilisateur - JJMMAA - HHMM_NOM DU FICHIER
ThisWorkbook.SaveCopyAs Filename:="U:\Divers\Ressources\Codes VBA\" & Environ("username") & " - " & Format(Now, "ddmmyy - hhnn") & "_" & ActiveWorkbook.Name

End Sub
 
Vote positif 0 Vote négatif
Re : Enregistrement automatique d'un fichier dans un dossier ?????

Bonjour GBI,

Et oui , là c'est le top du top , peut être à mettre dans l'évenementiel Workbook_BeforeSave et là c'est le fin des fins .....
 
Vote positif 0 Vote négatif
Re : Enregistrement automatique d'un fichier dans un dossier ?????

Hello les amis

Enfin sorti de mes réunions de travail, un petit break une douche et me revoici

J'ai pu essayer les différents codes et tous fonctionnent à présent.
Quand je me suis lancé, j'avais pas la tête froide aussi j'ai fait n'importe quoi.
Pour preuve j'avais oublié d'inscrire "Private Sub"
Donc, soyons bref, mais à la hauteur

Merci à vous tous pour votre patience, votre dévouement et bravo pour votre savoir-faire

Grace à vous c'est la fin des sauvegardes manuelles qui sont contraignantes
mais imposées dans mon entreprise.

Bye les amis

A+ sur le fil
😉🙂😀

Vincent
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

S
  • Question Question
XL 2019 Enregistrer plusieurs feuilles excel en un fichier PDF dans un dossier portant le nom d'une cellule
Réponses
4
Affichages
2 K
Phil69970
L
  • Question Question
XL 2016 Code pour Enregistrement d'un fichier dans un dossier
Réponses
0
Affichages
640
Le novice
L
H
  • Question Question
XL 2016 [RESOLU] Enregistrer un fichier dans un dossier réseau changeant
Réponses
9
Affichages
4 K
Hynnuh
H
A
  • Question Question
Sauvegarde dans un dossier précis
Réponses
2
Affichages
616
AzoR
A
I
  • Question Question
Enregistrement automatique du nom de fichier
Réponses
4
Affichages
929
Igor
I
A
  • Question Question
Fenêtre chemin d'enregistrement
Réponses
4
Affichages
1 K
AzoR
A
L
  • Question Question
HELP!! - Enregistrer dans un dossier voulu un document en PDF avec macro
Réponses
4
Affichages
1 K
lanoria
L
C
  • Question Question
Pbm d'exécution - copie d'une page dans un nouveau fichier avant chaque sauvergarde
Réponses
7
Affichages
1 K
Modeste
S
  • Question Question
Excel macro : Enregistrement du fichier suivant dossier indiqué dans cellules
Réponses
5
Affichages
2 K
Snoopy6102000
S
R
  • Question Question
Sauvegarder sous un fichier Excel au fiormat sans macros
Réponses
11
Affichages
2 K
job75
S
  • Question Question
Sauvegarde d'un fichier selon la valeur du combobox
Réponses
0
Affichages
37 K
Squoltahthx94
S
  • Question Question
VBA : enregistrement CSV sous 2003 avec "," au lieu de ";"
2
Réponses
16
Affichages
3 K
miguelangelo
B
  • Question Question
Macro de sauvegarde avec critère
Réponses
4
Affichages
1 K
bougy
B
B
  • Question Question
macro enregistrement automatique
2
Réponses
23
Affichages
7 K
vadelacaisse
V
B
  • Question Question
Enregistrement automatique rectification
Réponses
5
Affichages
910
bobafric
B
G
  • Question Question
Génération Fichier + Format Date
Réponses
2
Affichages
916
Gaffy84
G
  • Question Question
bouton pour aller d'un fichier excel vers une diapo power point
Réponses
2
Affichages
2 K
emsec72
  • Question Question
Copie de sauvegarde automatique fichier excel
Réponses
4
Affichages
4 K
matrix
M
  • Question Question
Enregistrer sous et vider un formulaire
Réponses
0
Affichages
1 K
Matjul
M
G
  • Question Question
VBA sauvegarde clef USB récalcitrante
2 3 4
Réponses
47
Affichages
5 K
ninbihan
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…