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"
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.
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...)
Code:
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"
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