[VBA-E] Enregistrement fichier Excel

Bonjour,
j'explique mon problème :

J'ai créé un fichier 1 Excel qui s'ouvre à partir d'un fichier général.
Je souhaiterai que dès que l'on modifie le Fichier1, il soit enregistré vers un répertoire bien particulier.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim datejour As String NomFichier = ActiveWorkbook.Name datejour = Format(Sheets(1).Range("B6"), "d_mmmm_yyyy")   ActiveWorkbook.SaveAs Filename:= _ "J:\Funf_tec\Préventif FUNF\Archives\" & NomFichier & datejour & ".xls", _ FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False End Sub

---

C'est le code que j'ai mis dans Thisworkbook. Le problème est que si j'enregistre manuellement, il me modifie mon fichier1. En effet mon code ne s'effectue seulement à la fermeture du fichier.

Quelqu'un a t-il une solution ???
:(

Tu peux reformuler ?

Citation:

---

Envoyé par Tu

Je souhaiterai que dès que l'on modifie le Fichier1, il soit enregistré vers un répertoire bien particulier

---

Quelle que soit la modif ? Tu frappes sur une touche et "vlan !" le fichier est enregistré ?
Sous son nom ?

Citation:

---

Envoyé par Tu

Le problème est que si j'enregistre manuellement, il me modifie mon fichier1. En effet mon code ne s'effectue seulement à la fermeture du fichier.

---

Comment ça "il modifie mon fichier1" ?

Bref,
- mets ton code dans un module standard de ton fichier1,
- place-le dans Workbooks_Open de telle manière qu'il enregistre à l'ouverture ton fichier1 sous le nouveau nom ("J:\Funf_tec\Préventif FUNF\Archives\" & NomFichier & datejour & ".xls")
- ferme ton fichier1
Tu travailleras ainsi sous NomFichier
Inconvénient : si fichier1 n'a pas été modifié, il a malgré tout été enregistré sous son nouveau nom
Inconvénient : Si tu ouvres deux fois fichier1 le même jour, tu auras le message "NomFichier" existe déjà, voulez-vous l'écraser O/N ?"
Etc.
Essaie de nous éclairer sur ce que tu veux faire plus précisément ;)

je pense que tu as trouvé la solution a mon problème.
Je n'avais pas pensé à l'enregistré à l'endroit dès l'ouverture du fichier.
C'est une bonne idée.
Tu as éclairé ma journée si triste à cause de ce temps si pourri.

Bonne journée