Discussion :

[Mut]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[cafeine]

Hello,

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

?

Sinon pour le nombre de valeurs d'une colonne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Mut]

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

[cafeine]

Essaie :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Mut]

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

Merci beaucoup !