afficher une années dans ComboBox

[gege21]

bonsoir a tous

en colonne a j'ai des date
et je voudrai affiche une années choisie dans un ComboBox

 

[Softmama]

Re : afficher une années dans ComboBox

Bonjour,

Comme ceci p-ê ?

 

[gege21]

Re : afficher une années dans ComboBox

bonjours softmamna

désole d'avoir été si long
c tout a fais se que je veux sauf que si je déplacé le bouton cela ne marche plus
quel sont le modification a faire

 

[DL_13]

Re : afficher une années dans ComboBox

Bonjour,

Il faut mettre le nom de la feuille où il y a les données pour que cela fonctionne

Option Explicit
Private Sub userform_initialize()
Dim t As Long, yMin As Long, yMax As Long
    yMin = Year(Application.Min(Sheets("data").Range("A:A")))
    yMax = Year(Application.Max(Sheets("data").Range("A:A")))
    For t = yMin To yMax
        ComboBox1.AddItem t
    Next
End Sub

Bonne Journée