Microsoft 365 Macro entre 2 classeurs

Bonjour,

Voici mon problème, je veux utiliser une macro pour copier des données d'un classeur à un autre.
Tout fonctionne correctement avec la macro suivante

ActiveSheet.Outline.ShowLevels RowLevels:=0, ColumnLevels:=1
ActiveSheet.Outline.ShowLevels RowLevels:=0, ColumnLevels:=2
ActiveSheet.Outline.ShowLevels RowLevels:=1
ActiveSheet.Outline.ShowLevels RowLevels:=2
Windows("Bus Bilan 2025.xlsx").Activate
Range("A2:E10").Select
Selection.ListObject.ListRows.Add (1)
Selection.ListObject.ListRows.Add (2)
Selection.ListObject.ListRows.Add (3)
Selection.ListObject.ListRows.Add (4)
Selection.ListObject.ListRows.Add (5)
Selection.ListObject.ListRows.Add (6)
Selection.ListObject.ListRows.Add (7)
Selection.ListObject.ListRows.Add (8)
Selection.ListObject.ListRows.Add (9)
Windows("BUS.xlsm").Activate
Range("L22😛30").Select
Selection.Copy
Windows("Bus Bilan 2025.xlsx").Activate
Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows("BUS.xlsm").Activate


Mon problème est que la macro est lié au nom du classeur "BUS" et que je voudrais pouvoir l'utiliser pour des classeurs quotidiens qui s'appellent "BUS 15 juin 2025", BUS 16 juin 2025", "BUS 17juin 2025"
J'ai créé ces fichiers quotidiens en dupliquant mon fichier de base "BUS"
La macro ne fonctionne donc plus du fait des noms différents pour chaque fichier quotidien

J'imagine qu'il y a une solution mais je ne la connais pas.
Est ce que quelqu'un peut m'aider ?

Merci par avance pour vos réponses