Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Dernière cellule non vide

P

Patrice

Guest
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
 
M

Myta

Guest
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
 
P

Patrice

Guest
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
 
D

Djar

Guest
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
 
S

steplof

Guest
Salut et meilleurs voeux pour 2003

Sauf erreur ceci doit fonctionner(voir classeur joint)

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

@+ Steplof
 

Pièces jointes

  • Djar.xls
    22 KB · Affichages: 1 541
@

@+Thierry

Guest
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
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…