Compter le nombre de cellule

Bonjour,

J'ai une colonne dans une feuille excel qui contient des cellules vides et non vides genre :

toto
titi
"cell vide"
toto
toto
"cell vide"
"cell vide"
"toto"


J'aimerais savoir comment compter le nombre de cellule qui sont differents de toto et de la cellule vide. Je precise les compter et non de compter celles egales a titi directement.

Merci de votre aide

En faisant une boucle sur les éléments (cellules) du Range (la colonne).

Coucou voici le code pour la recherche du nombre de cellulle différente de toto et d'une cellule vide

Code:

---

1 2 3 4 5 6

for i = N°1ereLigne to N°DernièreLigne if worksheets("Ma Feuille").cells(i,N°Colonne).text<>"toto" or cells(i,N°Colonne).text<>"" nbcellule = nbcellule+1 end if next i

---

bonne continuation

ce serait pratique si tu ecris le code. le .end(xldown) s'arrete a la premiere cellule vide et donc ne detecte pas le fait que j'ai des cellules vides

(je parlais du message d'AlainTech)

Part dans l'autre sens alors :

Code:

---

DernièreLigne = Range("A65535").End(xlUp).Row

---

je te suis pas la

Code:

---

1 2 3 4 5 6 7 8

Range("C2").Select NbLignesVidesInclus = Selection.SpecialCells(xlCellTypeLastCell).Row countk = 0 For k = 1 To NbLignesVidesInclus If (Range("C2").Cells(k, 1) <> "toto") And (Range("C2").Cells(k, 1) <> "") Then countk = countk + 1 End If Next k

---