Dernière cellule non vide

[Patrice]

Bonjour
Cherche solution avec fonction(s) si possible.
Comment puis-je trouver la dernière valeur ds une colonne et ce sans utiliser le min ou max? De plus cette valeur doit être affichée ds une autre cellule.
Par exemple à A1, je veux voir apparaître la dernière valeur de la colonne B, icelle peut être à la ligne 20 comme à la ligne 500. Il n'y a pas de cellule vide intercalé ds la colonne.
Merci

 

[Myta]

En esperant pouvoir régler ton probleme


A1 96028......formule dans la cellule =INDEX(B8:B15;NBVAL(B8:B15);1)

B8 94523
B9 96024
B10 96025
B11 96026
B12 96027
B13 96028
B14
B15


Myta

 

[Patrice]

Salut
Un OSSSSSSSST.... de gros merci!
Ca fait plus de trois heures que je tente de trouver une solution, de plus, un consultant a tenté de m'aider sans succes.
Merci encore
Patrice

 

[Myta]

Plaisir de t'avoir dépanner

 

[Djar]

Bonjour au Forum et Bonne Année à tous,

Cherche solution.

Comment puis-je trouver la dernière valeur dans une colonne.

De plus cette valeur doit être affichée ds une autre cellule.
Par exemple à A1, je veux voir apparaître la dernière valeur de la colonne B, ici elle peut être à la ligne 20 comme à la ligne 500. Il a par contre possibilité d'avoir des cellules vides intercalées dans la colonne.

Merci à vous tous

 

[steplof]

Salut et meilleurs voeux pour 2003

Sauf erreur ceci doit fonctionner(voir classeur joint)

valeurdernierecelluleA= range("a65535").end(xlup).value

@+ Steplof

 

[Djar]

Re steplof ,

oki ca fonctionne mais m'étais mal exprimer

je voulais le numéro de la rangée et non la valeur de la cellule

Désolé et merci qd même

Djar

 

[@+Thierry]

Salut Djar

Pour Savoir la dernière rangée c'est le même code

Sub Test ()
Dim LastLigne as Integer
LastLigne = range("a65535").end(xlup).row
MsgBox LastLigne
End Sub

Voilà c'est pas plus compliqué que çà..... Si tu compte descendre plus bas que la ligne 32767 alors tu déclares en as Long

Bonne Nuit
@+Thierry

 

[Djar]

Re le forum,

Merci @+Thierry