compter les items d'une listbox

[mikepers]

bonjour.

sur un projet de base de donnée VBA

j'ai une difficulté, je souhaiterai reporter sur un textbox le nombre d'items présents dans une listbox.
Tous le monde semble donner le code :
TextBox1.Value = ListBox1.ListCount
cela fonctionne mais me renvoie le nombre de ligne total de la listbox, y compris les parties vides.
Je souhaiterai ne décompter que les éléments actifs.
Avec TextBox1.Value = ListBox1.ListCount - >me renvoi actuellement 600 ( le nombre de possibilités d'insertion dans la base ) alors que je n'ai pour l'instant que 24 lignes remplies dans la base de donnée. Ma recherche : renvoyer dans le textbox le nombre 24, correspondant aux items enregistrés.

Bien à vous
Michel

 

[herve62]

Bonjour
Juste je viens de répondre à un Pb de Listbox ( de Jean32)
c'est pour afficher les fichiers xls , tu pourrais adapter à tes données ?
J'ai supprimé la ligne dans la boucle ou à chaque ajout ( additem) je faisais Nbfic=Nbfic+1
tu pourrais reprendre et enfin utiliser cette variable dans ta textbox
Mais bon ..... on peut pas en dire plus !!! vu qu'on a pas ton fichier ?🙁

 

[ChTi160]

Bonjour mikepers
Bonjour le Fil (Herve62) ,le Forum
ton problème vient surement de la façon dont tu remplis ta ListBox
si tu utilises une plage de données via la propriété "RowSource" de ta ListBox , tu transferes sans tenir compte des Lignes Vides , c'est le nombre de lignes de cette Plage qui est pris en compte ;
Sans fichier pas évident de te donner une réponse adaptée !
Bonne fin de Journée
Amicalement
jean marie

 

[mikepers]

bonjour et merci !
ci joint le fichier.
Heu, un peu complexe désolé ( ça bidouille )
pour l'instant la bd est relativement stable, j'essaie de débuger petit à petit.
Mon problème est sur la listbox de l'USF2 ( remontée textbox dans l'USF3
J'espère que le fichier a été téléchargé

 

[DoubleZero]

Bonjour à toutes et à tous,

mikepers, une rép🙄nse, ici, serait appréciée...

 

[DoubleZero]

Re-bonjour,

Merci, mikepers, pour la réponse.

A bientôt 🙂🙂