[VBA-E] "Pas de cellule correspondante" à la place de 0

Bonjour je suis sous Excel 2003 et j'ai un bout de code qui devrait me renvoyer un nombre de cellule.

Code:

---

1 2	msgbox Workbooks("Fichier").Worksheets("Feuill1).Range("A1:" & Range("A1").EntireColumn.SpecialCells(xlCellTypeConstants).Count + Range("A1").EntireColumn.SpecialCells(xlCellTypeBlanks).Count)

---

En résumé il devrait me renvoyer le nombre de cellule non vides + les vides également mais à la place de ça il me renvoit : "pas de cellule correspondante" ...

Quelqu'un a t'il une idée pour qu'il me renvoit 0 à la place ! ?


Merci

Hello,

je pige pas, tu veux les vides et les non vides ... en gros tu les veux toutes ?

Code:

---

Range("A1:E10").Cells.Count

---

?

Sinon pour le nombre de valeurs d'une colonne :

Code:

---

application.WorksheetFunction.count(range("A:A"))

---

Ouai c'est vrai que c'est pas clair en fait mon but final est d'obtenir le n° de la ligne qui contient la dernière valeur. Ex :

AAAAA
ZZZZZ
EEEEE

RRRRR

TTTT


YYYY

dans cet exemple je souhaite que obtenir la valeur de la ligne YYYY c'est à dire 10. Je veux la valeur de la dernière cellule renseigné en incluant les cellules blanches en résumé


Merci

Essaie :

Code:

---

range("A65536").end(xlup).Row

---

Très astucieux ! je m'acharnais à partir du haut alors que c'est si simple du bas....

Merci beaucoup !