[VBA Excel] nb cells non vide dans une colonn

Raph -  
 ensatien -
Bonjour,

Comment connaitre le nombre de cellule non vide contenu dans la colonne A par exemple de la sheet1 ?
via fonction c'est simple il y a le NB.Si, mais en VBA ?

quelqu'un a t-il une idée ?

Merci

Raph
A voir également:

2 réponses

xjl Messages postés 232 Date d'inscription   Statut Membre Dernière intervention   183
 
Salut,

Tu peux faire ça:

Sub comptage()
n = 0
For Each Cell In Sheets(1).Columns(1).Cells
If IsEmpty(Cell) Then n = n + 1
Next Cell
MsgBox n

End Sub
13
Raph
 
Merci Xjl, j'ai trouvé plus court ;)

nbcells = Application.WorksheetFunction.CountA(Feuil1.Range("$A:$A"))
0
hammougua
 
Ab44 25 juil. 2009 à 13:15
et pour une collone B tu ferais comment ?
et tu le déclare comment nbcells ?
0
Gotts
 
Dim nbcells As Integer

et pour B suffit de remplacer les A par B ...
0