Limite d'une listbox

[Jimmy]

Bonsoir a tous ,


J'ai un petit probleme au niveau d'une listbox pour laquelle j'aimerais une mise a jour automatique a l'ouverture de mon Userform (Private Sub UserForm_Initialize ) , probleme est qu'a partir du moment où je depasse les 25 items , je ne peux plus passer par la methodes ==> ( aparemment )

DerLigne = Sheets(11).Range("D65536").End(xlUp).Row
Mes items = Sheets(11).Range("D2" & DerLigne).Address
ListBox1.RowSource = "Feuil11!" & Mes items

Quelqu'un pourrais t il m 'aider a ce sujet ?


Un grand merci au Forum !

 

[Lord Nelson]

Salut Jimmy,

En VBA, une variable ne peut contenir d'espace, donc "Mes items" ne passe pas. Essaie MesItems.

A+
Horatio

 

[Jimmy]

Tout d'abord merci , mais en fait ds ma macro mes items se nomment "Malist" et j'ai fait l'essais avec 25 items et 26 et lors que je met le 26 eme il n'apparait pas .
C'est pourquoi je me posais la question si la methode ".End(xlUp).Row" n'avait pas ses limites ???

Encore merci
Jimmy

 

[Lord Nelson]

Re Jimmy,

Essaie ceci :

ListBox1.RowSource = "Feuil1!D2" & Sheets("Feuil1").Range("D65536").End(xlUp).Row

Je l'ai testé sur une liste de 100 données sans pb.

A+
Horatio

 

[Jimmy]

Bonsoir ,

C'tout un est nikel , et dire que cela faisait plusieur jour que je trainais ce probleme !!! en tout cas merci pour ce ptit coup de main !!!

@+
Jimmy