Bonjour à tous

Je vous explique mon problème

Je travail dans une petite structure, on me demande de faire une macro pour ouvrir un fichier est copier tout ce qui a dessus et puis y coller sur un autre classeur excel

Dans la macro, J'ouvre le fichier A.xlsx je sélectionne toutes les cellules que je colle dans le fichier Fabricant.xlsx

La seul difficulté que je rencontre c'est le moment de choisir le fichier car ce fichier ( A.xlsx )peut changer de nom du jour au lendemain :

Voici le début de mon code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub Macro1()
'
' Macro1 Macro
'
 
'
 
    Workbooks.Open Filename:="A Définir"
    Cells.Select
    Range("A1").Activate
    Selection.Copy
    Windows("Fabricant.xlsx").Activate
    Sheets("Reception des donnees").Select
    Range("A1").Select
    ActiveSheet.Paste
    Sheets("Fabricant").Select
End Sub
Voila ou je suis coincer si vous avez une idée pour m'éclairer !

Merci par avance

Cordialement