Macro excel

Bonjour,

je vais essayer de mieux formuler ma question d'hier sur la recopie d'onglets excel ayant tous la même structure, vers un nouveau fichier résultat.
Voilà, j'ai une centaine de fichiers qui ne contiennent chacun qu'un seul onglet excel. Je souhaite les recopier tous dans un fichier résultat de façon à pouvoir utiliser les formules classiques (somme.si, ...)
Pour l'instant, j'ai renommer mes fichiers de données A,B,..., et je ne copie volontairement que des sélections parce qu'elles contiennent du texte qui peut être assez long.

Je ne sais pas paramétrer la macro que j'essaye d'écrire :
Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 14/02/2016 par util
'

' J'ouvre le fichier excel A
Windows("A.xls").Activate
Range("A1:H450").Select
Range("A450").Activate
Selection.Copy
' Je copie dans le fichier test_macro.xls
Windows("Test_macro.xls").Activate
ActiveWindow.SmallScroll Down:=-27
Range("A1").Select
ActiveSheet.Paste
' Je me positionne sur la 2eme feuille du fichier test_macro.xls
' puis ouvre le fichier B et recommence l'opération
Sheets("Feuil2").Select
Windows("B.xls").Activate
ActiveWindow.SmallScroll ToRight:=2
ActiveWindow.SmallScroll Down:=36
Range("A1:H450").Select
Range("H450").Activate
Application.CutCopyMode = False
Selection.Copy
Windows("Test_macro.xls").Activate
Range("A1").Select
ActiveSheet.Paste
Sheets("Feuil3").Select
End Sub

Quelqu'un peut-il m'aider
Un grand merci et bonne journéee