Macro pour MAJ fichier à partir d'un autre
Bonjour,
J’ai recu ce code sur ce forum et il fonctionne à merveille,
Sub MettreAjour()
Set f = ActiveSheet
chemin = ThisWorkbook.Path & "\"
On Error GoTo FichierManquant
Workbooks.Open Filename:=chemin & "Fichier_1.xlsx"
f.Cells.ClearContents
Range("A1").CurrentRegion.Copy f.Range("A1")
ActiveWorkbook.Close
Exit Sub
FichierManquant:
MsgBox "Le fichier ''Fichier_1'' doit etre dans le même dossier que celui du présent fichier.", 16
End Sub
Il me permet de mettre le Fichier_A à partir du fichier _1
Cependant, le FICHIER_1 est recu chaque mois (FICHIER_1 AVRIL , MAI ETC…
J’ai fait un test en suprimant fichier_1 et en créer un autre du meme nom mais les anciennes données disparaissent du FICHIEr_A et je voulais qu’elles restent histoire d’avoir toute la liste.
Je souhaiterai aussi que juste la colonne A et B soit prise en compte par exemple.
Et dernierement, Si je veux rajouter un deuxieme fichier, Exemple FICHIER_2 QUI VIENDRA AVEC fichier81 ENRICHIR fichier8a
Toutes mes excuses pour cette publication car j’en ai ai commencé une autre avant et je suis un peu devant une urgence .