Récupérer la valeur de la dernière cellule no vide

blalaa Messages postés 167 Date d'inscription   Statut Membre Dernière intervention   -  
blalaa Messages postés 167 Date d'inscription   Statut Membre Dernière intervention   -
bonjour

jai cree un tableu par vba , remplit pas des valeur dans chaque cellules ( de ligne 7 jusque ligne X ca depend lemplacement de la derniere ligne )

ma question ; comment on peut recuperer la valeur de la derniere cellule non vide , par exemple recuperer la valeur de cells(i,14) avec i = 9
merci

1 réponse

jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
Bonjour,
i = Sheets("Feuil1").Cells.Find("*", Range("A1"), , , xlByRows, xlPrevious).Row 'retourne la dernière ligne non vide de la feuille Feuil1

valDerniereCel = Sheets("Feuil1").cells(i,14)

1
blalaa Messages postés 167 Date d'inscription   Statut Membre Dernière intervention  
 
MERCI beaucoup

bonne journee
0
blalaa Messages postés 167 Date d'inscription   Statut Membre Dernière intervention  
 
je vais encore tembeter une fois

comme exemple précédent mais maintenant je veux récupérer la première cellule non vide
merci davence
0