[VBA Excel] nb cells non vide dans une colonn [Fermé]

Signaler
-
 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

2 réponses

Messages postés
233
Date d'inscription
mardi 27 mars 2007
Statut
Membre
Dernière intervention
12 juin 2007
166
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
12
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 66827 internautes nous ont dit merci ce mois-ci

Merci Xjl, j'ai trouvé plus court ;)

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

et pour B suffit de remplacer les A par B ...
et pour une collone B tu ferais comment ?
et tu le déclare comment nbcells ?
Padawan_95
Messages postés
8
Date d'inscription
dimanche 5 avril 2015
Statut
Membre
Dernière intervention
6 mai 2016

Bonjour,

Pour une colonne non vide justement ? Par quoi peut-on remplacer "IsEmpty" ?

Merci d'avance,

Padawan95
pour les cellules non vides au lieu de poser IsEmpty , on remplace par Not IsEmpty