<p>Plusieurs méthodes :</p>
<p><strong>Dernière ligne utilisée dans une colonne :</strong></p>
<pre data-code-wrap="vba"><code class="lang-vba">Dim lastRow As Long
lastRow = Cells(Rows.Count, 1).End(xlUp).Row
</code></pre>
<p><strong>Dernière colonne utilisée dans une ligne :</strong></p>
<pre data-code-wrap="vba"><code class="lang-vba">Dim lastCol As Long
lastCol = Cells(1, Columns.Count).End(xlToLeft).Column
</code></pre>
<p><strong>Dernière cellule utilisée sur la feuille :</strong></p>
<pre data-code-wrap="vba"><code class="lang-vba">Dim lastCell As Range
Set lastCell = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell)
</code></pre>
<p>Ou utilisez <code>UsedRange</code> :</p>
<pre data-code-wrap="vba"><code class="lang-vba">Dim lastRow As Long
lastRow = ActiveSheet.UsedRange.Rows.Count
</code></pre>
<p>Attention : <code>UsedRange</code> peut inclure des cellules qui ont été effacées mais dont le formatage persiste.</p>