Afficher la dernière valeur d'une colonne

Comment afficher dans une cellule de la feuille la valeur de la dernière cellule d'une colonne dont la longueur varie ?

Si tes valeurs sont dans la colonne A. Tu sélectionnes la dernière valeur de ta colonne et dans insertion/nom/définir, tu nommes cette cellule LaDer et dans la case en bas "fait référence à" tu tapes
=DECALER(A$1;NBVAL(A:A)-1;0)
Ensuite dans la cellule ou tu veux voir la valeur de cette cellule, tu tapes = LaDer Si tu ajoutes une valeur en dessous de celle-ci, ce sera la nouvelle valeur qui s'inscrira. Si tu as une étiquette en tête de ta colonne de valeurs, ta formule doit être : =DECALER(A$2;NBVAL(A:A)-2;0).
Autre solution, avec VBA :
Dans le module de la feuille : 

Private sub Worksheet_Change(ByVal Target As Range)
 If Target.Column <> 1 Then exit sub
 Range("C10") = Range("A65356").End(xlUp)
 end sub

Auteurs : , , ,

Mots clefs associés à cette page : , , , , ,

Afficher la dernière valeur d'une colonne

Par chimel38, le lun 30/01/2012 - 17:36.

Une restriction sur la solution proposée:
Fonctionne à la condition qu'il n'y ait pas de "trou" dans la colonne de données.

Dans ce cas il conviendrait d'utiliser une colonne TEST (A) conjointe à la colonne de données(B).
Sur chaque ligne de cette colonne TEST une formule (SI B <> 0;LIGNE();"") qui me renverra un numéro de ligne répondant au test, puis rechercher la valeur MAX de colonne A.

Ainsi nous aurons la hauteur recherchée pour déterminer par exemple une une plage dynamique.

Chimel38

Chimel

Anciennes et nouvelles versions

Par Daniel.C, le dim 20/03/2011 - 08:21.

 Peut-être écrire :

Range("C10") = Cells(1,Rows.Count).End(xlUp)
au lieu de : 
Range("C10") = Range("A65356").End(xlUp)