Comment trouver la dernière cellule utilisée (dernière ligne/colonne) dans une feuille Excel avec VBA ?
Plusieurs méthodes :
Dernière ligne utilisée dans une colonne :
Dim lastRow As Long
lastRow = Cells(Rows.Count, 1).End(xlUp).Row
Dernière colonne utilisée dans une ligne :
Dim lastCol As Long
lastCol = Cells(1, Columns.Count).End(xlToLeft).Column
Dernière cellule utilisée sur la feuille :
Dim lastCell As Range
Set lastCell = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell)
Ou utilisez UsedRange :
Dim lastRow As Long
lastRow = ActiveSheet.UsedRange.Rows.Count
Attention : UsedRange peut inclure des cellules qui ont été effacées mais dont le formatage persiste.