Réponse acceptée !
bonjour
une piste :
dans l'évenement load de la form qui contiend ta listbbox
for i = 2000 to 2050
list1.additem i
next i
dans l'évenement Click de ta listbox
workbook.open "c:\moi\document\nom du dir \" & list1.text & ".xlsx")
si c'est la solution, penser : REPONSE ACCEPTEE