Merci jean marie,
j'ai repris ton code , le souci c'est que ma liste est fluctuante, suivant l'ajout de nouveaux articles.
J'ai essayé de varier ton code :
Private Sub Userform_Initialize()
Dim f
Set f = Sheets("Articles")
Set Rng= f.Range("C2:C" & .Range("C1250").End(xlUp).Row).Value...