VBA comptage des lignes non vides

[BEN]

Comment faire une macro VBA pour compter le nombre de lignes remplies dans un fichier XLS et ensuite se servir du chiffre obtenu pour créer une boucle d'instructions qui vérifierait le contenu des cellules?
Merci d'avance.

 

[Thomas®]

BONJOUR!!

Comme tu peux t'en rendre compte ta question (tres simple) n'a aucune reponse???

ne trouves tu pas cela étrange?

je te conseil fortement de lire ceci :

https://www.excel-downloads.com/help/charte/

mais comme je sais que tu vas te reprendre voici la reponse à ta question

pour connaitre la derniere ligne rempli il faut procéder de la sort :

DerligneDonnées = Sheets(1).Range('A65536').End(xlUp).Row

cet exemple est prevu pour la feuil1 en concidérent que la ligne de reference est A
DerligneDonnées est une variable que tu dois declarer soit dans ta Sub ou dans la zone Général 'declaration'

sinon pour l'utiliser dans une boucle :

For i = 1 To DerligneDonnées

...(la tu fait la verif dont tu parlais)
Next i

cette methode est preconisé si ta macro utilise plusieurs fois la derniere ligne

sinon tu peux faire comme cela directement (ce qui t'evite de créer une variable)

For i = 1 To Sheets(1).Range('A65536').End(xlUp).Row

Next i

Bonne soirée
Thomas®

 

[Gérard DEZAMIS]

Bonjour Thomas et Ben

En A1 mettre =SOUS.TOTAL(3;B:B) et cela donnera directement le nombre de cellules ayant une valeur(donc non vides) de la colonne B
A adapter


@+ GD

 

[BEN]

Grand merci à THOMAS pour sa réponse