Consolider des données d'un champ nommé de plusieurs classeurs

Bjr

Je souhaiterais consolider à l'aide d'une macro dans un champ en I3:I7, les données de champs nommés "heures" de plusieurs classeurs aux nom générique : jb_1.xls, jb_2.xls , jb_3. xls ..

J'ai essayé par le menu consolider les données mais il faut ouvrir tous les fichiers, et sélectionner et ajouter tous les champs

J"ai essayé d'enregister une macro ( suis pas expert) mais elle a pas l'aire trop top

Range("I3").Select
Selection.Consolidate Sources:=Array( _
"'C:\Users\boullitt\Desktop\Documents\[jb_1.xls]1'!heures", _
"'C:\Users\boullitt\Desktop\Documents\[jb_2.xls]2'!heures", _
"'C:\Users\boullitt\Desktop\Documents\[jb_3.xls]3'!heures", _
"'C:\Users\boullitt\Desktop\Documents\[jb_4.xls]!heures"), Function:= _
xlSum, TopRow:=False, LeftColumn:=False, CreateLinks:=False
End Sub

Si quelqu'un peut m'aider

Merci d'avance