Bonjour, tout le monde
Function DernièreCellule(cellDépart As Range) As Long
DernièreCellule = Cells(65536, cellDépart.Column).End(xlUp).Row
End Function
Dans une feuille excel, clique sur Insertion/fonction, dans la boîte de dialogue, clique sur la catégorie "personnalisée", choisir le nom de la fonction, valide, dans la nouvelle boîte de dialogue, clique sur la cellule (de la même feuille, ou d'une autre feuille, et même d'un autre classeur), après validation la fonction retournera la dernière ligne utilisée dans la colonne spécifiée.
Bonne journée
@+Jean-Marie