compter les items d'une listbox

mikepers

XLDnaute Occasionnel
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

XLDnaute Barbatruc
Supporter XLD
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

XLDnaute Barbatruc
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

XLDnaute Occasionnel
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é
 

Pièces jointes

  • DCP_CORRECTIF.xlsm
    396.4 KB · Affichages: 72

Discussions similaires

Réponses
8
Affichages
355

Statistiques des forums

Discussions
311 733
Messages
2 082 019
Membres
101 872
dernier inscrit
Colin T