<p><strong>Formule :</strong></p>
<pre><code class="lang-auto">=RECHERCHE(2;1/(A:A<>"");A:A)
</code></pre>
<p>Ou avec INDEX/EQUIV :</p>
<pre><code class="lang-auto">=INDEX(A:A;EQUIV(2;1/(A:A<>"");1))
</code></pre>
<p>(valider avec Ctrl+Maj+Entrée car c’est une formule matricielle)</p>
<p><strong>En VBA :</strong></p>
<pre data-code-wrap="vba"><code class="lang-vba">Dim derniere As Range
Set derniere = Range("A" & Rows.Count).End(xlUp)
MsgBox derniere.Value
</code></pre>