Trouver la dernière cellule avec un contenu dans une feuille Excel

Pour ajouter une ligne (ou une colonne) à une liste gérée à partir de Vba, il est souvent nécessaire de trouver la référence de la dernière cellule pour ensuite insérer la nouvelle donnée.

Pour se faire, il est pratique d'utiliser la fonction Vba "End" permettant d'obtenir rapidement cette information.

Important : cette fonction ne doit s’utiliser que dans des colonnes ou lignes ininterrompues.

A noter, qu'il est possible de rechercher cette info dans chaque direction :

• vers la droite : xlRight
• vers la gauche : xlLeft
• vers le bas : xlDown
• vers le haut : xlUp

Exemples :

Recup = Range("A50000").End(xlUp).Address 'obtient la référence de la cellule juste après la dernière cellule contenant une donnée en partant du bas dans la colonne A

Recup = Range("A2").End(xlDown).Address 'obtient la référence la dernière cellule contenant une donnée en partant du haut  dans la colonne A

Recup = Range("A2").End(xlDown).Row 'obtient la dernière ligne contenant une donnée en partant du haut  dans la colonne A

Recup = Range("A2").End(xlRight).Column 'obtient le numéro de la dernière colonne contenant une donnée vers la droite  dans la ligne 2


Pour trouver la lettre qui correspond à cette colonne voir cet article : Trouver la lettre d'une colonne à partir de son numéro