Compter lignes grâce à macro

[sososo82]

Bonjour forum!

J'ai fais un ptit programme qui me permet de faire des statistiques sur des dossiers rentrés sur une feuile EXCEL.

Sur une autre feuille (mettons: "Stats") je fais des statistiques sur ces dossiers, j'aimerais bien qu'une macro compte le nombre de dossiers rentrés sur la première feuille ("Dossiers") et l'affiche sur "Stats".

Sachant que j'utilise les trois premières lignes de "Dossiers" pour des intitulés (qui ne rentrent pas en compte dans le calcul) et que le nombre de dossiers évolue constament.

J'ai ce code mais j'arrive pas à faire en sorte que le résultat s'affiche numériquement sur une cellule de la feuille "Stats"...

Dim NbLignes As Integer
Dim f As Worksheet

Set f = ActiveSheet 'selectionne feuille active
NbLignes = f.UsedRange.Rows.Count 'compte le nombre de ligne sur cette feuille


Merci pour votre aide

 

[skoobi]

Re : Compter lignes grâce à macro

Bonjour,

comme ceci?

Sheets("Stats").Range("??").Value = NbLignes

?? à remplacer par la cellule désirer.

 

[sososo82]

Re : Compter lignes grâce à macro

heu yep mais je rentre ça ou ?
dans la feuille concernée?

En fait j'ai mis un bouton dans "Stats" permettant de mettre le nombre de lignes utilisées dans trois feuilles de dossiers différentes, ce bouton affiche ensuite le nombre de lignes dans trois cellules de "Stats" le bouton fait ensuite l'addition des trois cellules (ça j'y arrive...)

En plus je crois pas que le code soit bon car il se passe rien quand je le fais...

 

[skoobi]

Re : Compter lignes grâce à macro

Re,

dans la même macro que ce que tu as donnés au premier message.

 

[sososo82]

Re : Compter lignes grâce à macro

Ok merci beaucoup!


Je récapitule juste, j'écris ce qui suit dans les feuilles du classeur dans lesquelles
je veux compter les lignes:

Dim NbLignes As Integer
Dim f As Worksheet

Set f = ActiveSheet 'selectionne la feuille active
NbLignes = f.UsedRange.Rows.Count 'compte le nombre de ligne sur cette feuille

Sheets("Stats").Range("C15").Value = NbLignes

Bonne soirée

 

[sososo82]

Re : Compter lignes grâce à macro

Ah ça marche mais le problème c'est que ça compte le nombre de ligne ou je suis déja allé avec le curseur mais pas le nombre de lignes ou il y a vraiment quelque écris dedans... C'est plus embêtant, y aurait-il un paramètre à régler dans ce code pour qu'il compte vraiment les lignes "écrites" ?

Merci d'avance

 

[skoobi]

Re : Compter lignes grâce à macro

Bonjour,

voici un fichier dont la macro compte les lignes contenant des données.

 

[sososo82]

Re : Compter lignes grâce à macro

Merci Beaucoup Skoobi!!!

je regarderais ça ce soir... A cause de mes problemes de décompression de fichier...

Franchement vous faites du bon boulot sur ce forum

A bientot