Accueil>VBA>Excel – Déterminer la dernière ligne d’un tableau ou d’une colonne remplie, via la programmation VBA

DERNIERELIGNE est une fonction qui est créée dans Excel, via le code VBA pour déterminer la derniere ligne.

Cette fonction s’avère très pratique pour connaître la dernière ligne d’une colonne. Elle peut être utilisée dans des zones de liste dont le contenu peut varier.

La syntaxe de la fonction DERNIERELIGNE est :

DERNIERELIGNE( Zone ) 

L’argument Zone représente la colonne ou une cellule d’une colonne : A1 ou B:B

Voici un exemple d’utilisation :

Pour utiliser cette fonction, il faut la copier et la placer dans un module VBA.

  • depuis Excel, faire ALT F11, vous ouvrez le module VBA.
  • clic droit sur ThisWorBook, INSERTION / MODULE

creer-module-vba

  • Coller le code suivant :

Function derniereligne(zone As Range) As Integer
‘DOPHIS
Application.Volatile
If zone.Columns.Count > 1 Then
derniereligne = 0
Else
derniereligne = ActiveSheet.Cells(Columns(zone.Column).Cells.Count, zone.Column).End(xlUp).Row
End If
End Function

Vous pouvez télécharger le fichier ci-dessous pour tester l’utilisation de cette fonction dans une zone de liste.