compter les elements d une colomne

P

PAD

XLDnaute Occasionnel

• 6 Avril 2006

• #2

Salut Arno,

Je crois que NBVAL devrait fair ton bonheur

A+ PAD

 

Vote positif 0 Vote négatif

A

arno

Guest

• 6 Avril 2006

• #3

merci bcp pad

 

Vote positif 0 Vote négatif

A

arno

Guest

• 6 Avril 2006

• #4

mais comment dois je m en servir? il ne se passe rien lorsque je le mes sur ma feuille excel. faut il que je le place dans le code de la feuille active?
merci

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 6 Avril 2006

• #5

Salut Arno, Pad,

La solution que t'a proposé Pad est une formule donc a utiliser sur la feuille de calcul, mais rien ne vaut une petit macro donc en voici une just for the fun :

Code:

Sub test()
Dim c As Range

Set tableau = Range('A1:D9')
For Each c In tableau
    If Not c.Value = '' Then x = x + 1
Next c
MsgBox ('Dans le tableau ' & tableau.Address(0, 0) & ' il y a ' & x & ' cellule remplit')
End Sub

@+

 

Vote positif 0 Vote négatif

A

arno

Guest

• 6 Avril 2006

• #6

merci c exactement ce k il me fallait. je veux faire le plus de chose sur macro
a tanto :woohoo:

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 7 Avril 2006

• #7

Salut Arno, bonjour le fil,

Comme Hervé 'n'a pas osé' poster sa proposition, je l'a mets en ligne afin que tout le monde puisse en profiter, et je pense que ca devrait faire plaisir a Arno, si tu veux du code, en voila un autre morceau, qui fait la même chose que le mien, mais sans boucle:

Code:

Sub Macro4() 
Dim x As Integer 
 
x = Range('A1:D9').SpecialCells(xlCellTypeConstants, 23).Count 
MsgBox ('Dans le tableau il y a ' & x & ' cellule remplit') 
End Sub

@+

 

Vote positif 0 Vote négatif