XL 2016 Ajout de liste issus de programme dans une listebox sur userform

[S[1]t'Yor]

Bonjour

J'ai un programme qui me créer 2 listes (pour l'exemple, ce n'est pas mon cas final) et j'aimerais que chacune de ces listes soi envoyées vers unj UserForm avec 2 Listbox. Etant novice en VBA, je cherche à comprendre comment faire pour appeler l'Userform en important à l'interieur les 2 listes. Vous trouverez un Excel exemple en pj

Cordialement

S

 

[vgendron]

Bonjour

pour lancer le userform

sub lance()
userform1.show
end sub

pour charger les listbox

Private Sub UserForm_Initialize()
Me.ListBox1.List = Sheets("Feuil1").Range("D6:D13").Value
Me.ListBox2.List = Sheets("Feuil1").Range("F6:F13").Value

End Sub

 

[S[1]t'Yor]

Bonjour

Merci pour cette réponse, cependant ma demande est la suivante:

mes listes sont créées dans le Sub lance () (imaginons) et j'aimerais que mes listes soient importées dans le userform

Cordialement

S

 

[vgendron]

bonjour
c'est ce que fait ma réponse

 

[S[1]t'Yor]

bonjour
c'est ce que fait ma réponse

mais mes listes sont des variables. Si vous regardez le fichier joint, J'ai un premier programme qui fait les listes. Ces listes doivent ensuite aller dans les listes box. Je ne peux pas faire avec les range etc....