LISTE DEROULANTE

BONJOUR A TOUS ET TOUTES
ref si dessous

ce que je recherche c est de prendre des cellules dans une autre feuille du meme classeur.

merci pour la solution


Private Sub UserForm_Activate()
Dim LstFeuille As String
LstFeuille = Range("A1").End(xlDown).Address
' Plage de données pour afficher dans liste déroulante
SelectFeuille.RowSource = "A1:" & LstFeuille
' Afficher la première SelectFeuille de la liste (0)
SelectFeuille.ListIndex = 0
End Sub