Comptage de cellules pleines

missLaura · 6 Juin 2010

Bonjour,
J'aimerais savoir s'il existe un moyen de compter le nombre de cellules pleines sur une plage de cellules verticale sans utiliser de boucle for et ranger cette valeur dans une variable N.

Merci <3 <3

BOISGONTIER · 6 Juin 2010

Re : Comptage de cellules pleines

Bonsoir,

n = Application.CountA([A1:C5])

JB

camarchepas · 6 Juin 2010

Re : Comptage de cellules pleines

Bonjour,

Une autre méthode :

Sub Bouton1_QuandClic()
Dim DernièreLigne As Long
Dim PremièreLigne As Long
PremièreLigne = Range("A1").End(xlDown).Row
DernièreLigne = Range("A65536").End(xlUp).Row
MsgBox "la première ligne est la " & PremièreLigne & " et la derniere ligne est " & DernièreLigne
End Sub

ROGER2327 · 6 Juin 2010

Re : Comptage de cellules pleines

Bonsoir à tous

Code:

[COLOR="DarkSlateGray"][B]   N = [A1:C5].Count - WorksheetFunction.CountIf([A1:C5], "") [COLOR="SeaGreen"]'Plage à adapter[/COLOR][/B][/COLOR]

peut-être ?

ROGER2327
#3648

Vendredi 20 Merdre 137 (Sainte Colombine, expurgée, SQ)
18 Prairial An CCXVIII
2010-W22-7T17:30:12Z

Comptage de cellules pleines

missLaura

Guest

BOISGONTIER

XLDnaute Barbatruc

camarchepas

XLDnaute Barbatruc

Pièces jointes

ROGER2327

XLDnaute Barbatruc

Discussions similaires

Comptage de cellules pleines

missLaura

Guest

BOISGONTIER

XLDnaute Barbatruc

camarchepas

XLDnaute Barbatruc

Pièces jointes

ROGER2327

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency