D
DENIS
Guest
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
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