il y a t il plus facile

Bonsoir

je créer un userform avec plusieurs liste déroulantes
il y a pas plus facile que

Private Sub test1_Change()
test.List = Worksheets("Donnée").Range("A2:A100").Value
End Sub

Private Sub Papier2_Change()
test.List = Worksheets("Donnée").Range("A2:A100").Value
End Sub

en plus j ai le problème que je suis obliger de taper une letre avant que ma liste arrive
quelle qu'un a une solution SVP
Je débute dans la programmation

merci a ce forum