calcul du nombre de lignes contenant 4 colonne d'une feuille

RENAUDER

Nous a quitté

Repose en paix

• 9 Juillet 2009

• #2

Re : calcul du nombre de lignes contenant 4 colonne d'une feuille

Bonjour,
Par exemple

Code:

Range([B2], [B65536].End(xlUp)).Select
NbLignes = Selection.Rows.Count

 

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 9 Juillet 2009

• #3

Re : calcul du nombre de lignes contenant 4 colonne d'une feuille

Bonjour Bonanos, le forum,

un exemple parmi tant d'autres,

JHA

 

Pièces jointes

• Calcul nombre de ligne.xls

  22.5 KB · Affichages: 99

Vote positif 0 Vote négatif

B

bonanos

XLDnaute Nouveau

• 10 Juillet 2009

• #4

Re : calcul du nombre de lignes contenant 4 colonne d'une feuille

dfgg
fgfg
ggg
ggg

 

Dernière édition: 8 Décembre 2009

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 10 Juillet 2009

• #5

Re : calcul du nombre de lignes contenant 4 colonne d'une feuille

Bonjour,

Que tu peux écrire de façon plus courte (le .select est inutile) :
derlig = [B65536].End(xlUp).Row

ou bien pour être valable sur toutes les versions excel :
derlig = Cells(Cells.Rows.Count, 2).End(xlUp).Row
2 représentant la colonne B
eric

 

Vote positif 0 Vote négatif

B

bonanos

XLDnaute Nouveau

• 13 Juillet 2009

• #6

Re : calcul du nombre de lignes contenant 4 colonne d'une feuille

fffgf
ggg
gg
gg
g

gg
g

 

Dernière édition: 8 Décembre 2009

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 13 Juillet 2009

• #7

Re : calcul du nombre de lignes contenant 4 colonne d'une feuille

Re,

il suffit d'ajouter le nom de la feuille :
derlig = worksheets("Feuil1").Cells(Cells.Rows.Count, 2).End(xlUp).Row

ce que tu peux mettre sous forme de variable:
dim sh as worksheet
set sh = worksheets("Feuil1")
derlig = sh.Cells(Cells.Rows.Count, 2).End(xlUp).Row

eric

 

Vote positif 0 Vote négatif