Compter les cellules non vides

Bonsoir

Je cherche la syntaxe pour compter dans la colonne "A" le nombre de cellules non vides.

Merci d'avance
Domino40.

Code:

---

X=Application.WorksheetFunction.CountA(Range("A1:A" & Range("A65536").End(xlUp).Row))

---

Bonjour

Tu peux plus simplement essayer :

Code:

---

Application.WorksheetFunction.CountA(Range("A:A"))

---

Philippe