Nombre de ligne non vide inscrit dans textbox

[rainbow69006]

Bonjour,

J'ai une feuille avec un userform et dans celui-ci une textbox.
Je souhaiterais savoir comme faire pour que dans cette textbox soit inscrit le nombre de ligne non vide (en ne prenant pas en compte la première ligne) d'une feuille nommé "infos"

Merci de votre aide

 

[Robert]

Re : Nombre de ligne non vide inscrit dans textbox

Bonjour Rainbow, bonjour le forum,

Quelle colonne de référence ?

 

[Ubot303]

Re : Nombre de ligne non vide inscrit dans textbox

Bonjour,

Textbox1.clear
Textbox1.additem cells(1,1)
Textbox1.additem cells(1,2)
Textbox1.additem cells(1,3)
Textbox1.additem cells(1,4)
...

A varier en fonction de la colonne, si des données sont rangées en lignes...
Et à placer dans une macro évenementielle à l'ouverture/chargement de ton userform.

 

[kjin]

Re : Nombre de ligne non vide inscrit dans textbox

Bonjour,
Salut l'ami Sétois, tu as aussi ressorti les moufles 🙂
Comme la question est pour le moins obscure (c'est le temps gris...)

Set plage = ActiveSheet.UsedRange
nbLig = plage.Rows.Count - 1
nbCol = plage.Columns.Count
For i = 2 To nbLig + 1
    If plage.Rows(i).SpecialCells(xlBlanks).Count < nbCol Then nbLig = nbLig - 1
Next
MsgBox "il y a " & nbLig & " lignes totalement vide dans la feuille"

A+
kjin

 

[Pierrot93]

Re : Nombre de ligne non vide inscrit dans textbox

Bonjour à tous

perso, pas sûr que la méthode "additem" s'zapplique à un "textbox", chez moi s'applique sur "listbox" ou "combobox"... l

bon après midi
@+

 

[Robert]

Re : Nombre de ligne non vide inscrit dans textbox

Salut l'ami Sétois, tu as aussi ressorti les moufles 🙂
Comme la question est pour le moins obscure (c'est le temps gris...)
kjin

Salut Kjin,

je dirais même plus... c'est le temps gris et laveur dur, on croit au mirage...

Pour Pierrot : c'est la méthode AddIdas qui marche !

Putain je vous jure je le ferai plus...

 

[rainbow69006]

Re : Nombre de ligne non vide inscrit dans textbox

Bonjour,

Etant donné que mes expliquations n'étaient pas des plus claires,
J'ai fais un petit exemple joint.

Merci de votre aide
Slts

 

[Pierrot93]

Re : Nombre de ligne non vide inscrit dans textbox

Re

bien vu Robert🙄

Pour Pierrot : c'est la méthode AddIdas qui marche !

 

[kjin]

Re : Nombre de ligne non vide inscrit dans textbox

Re,
Dans le ciel comme dans ton exemple, il fait toujours aussi sombre :
Faut-il que les 2 colonnes soient renseignées pour considérer que la ligne est non vide ?
AddTaleur (pour Robert...)
kjin

 

[rainbow69006]

Re : Nombre de ligne non vide inscrit dans textbox

Bonjour kjin,

Si il y a aucun éléments dans les 5 premières colonnes de la ligne, on considère que la ligne est vide

Slts

 

[Ubot303]

Re : Nombre de ligne non vide inscrit dans textbox

Bien vu pour l'additem : je ne l'utilise que pour une listbox 😉


Avec une formule :
=NB.SI(infos!A:A;"<>")-1

Avec la macro : exemple ci-joint 😀

 

[rainbow69006]

Re : Nombre de ligne non vide inscrit dans textbox

Super Merci!!