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

blalaa Messages postés 171 Statut Membre -  
blalaa Messages postés 171 Statut Membre -
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

  1. jordane45 Messages postés 30427 Date d'inscription   Statut Modérateur Dernière intervention   4 833
     
    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
    1. blalaa Messages postés 171 Statut Membre
       
      MERCI beaucoup

      bonne journee
      0
    2. blalaa Messages postés 171 Statut Membre
       
      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