Ce site est optimisé pour être consulté depuis un navigateur moderne dans lequel JavaScript est activé.

Convertir Cells(1,1) en « A1 » et vice versa

ayi

Comment convertir entre la notation Cells(ligne,colonne) et la notation « A1 » en VBA ?

ayi_2

Cells vers adresse :
<pre data-code-wrap="vba"><code class="lang-vba">Dim adresse As String
adresse = Cells(1, 1).Address(False, False) ' retourne "A1"

</code></pre>
Adresse vers Cells :
<pre data-code-wrap="vba"><code class="lang-vba">Dim rng As Range
Set rng = Range("A1")
Dim ligne As Long, colonne As Long
ligne = rng.Row ' 1
colonne = rng.Column ' 1

</code></pre>