Re
Si vous parlez de cette ligne : ComboBox1.List = Array("2016", "2017") pou Ajouter des années
Il suffit d'ajouter une virgule (,) et l'année entre deux guillemets "2019"
Exemple
ComboBox1.List = Array("2016", "2017","2016", "2017")
ComboBox1.List = Array("2016", "2017" , "2018", "2019" , "2020", "2021")
-----------------------------------------------------
Si vous avez de nombreuses années Supprimer la ligne : ComboBox1.List = Array("2016", "2017")
et remplacer acev ce dode
Dim i As Long
For i = 2010 To 2030 Step 1
ComboBox1.AddItem i
Next
----------------------------------------------------------
2010 représente le début
2030 représente la fin