Convertir Cells(1,1) en « A1 » et vice versa
Convertir Cells(1,1) en « A1 » et vice versa
Comment convertir entre la notation Cells(ligne,colonne) et la notation « A1 » en VBA ?
Re: Convertir Cells(1,1) en « A1 » et vice versa
**Cells vers adresse :**
```vba
Dim adresse As String
adresse = Cells(1, 1).Address(False, False) ' retourne "A1"
```
**Adresse vers Cells :**
```vba
Dim rng As Range
Set rng = Range("A1")
Dim ligne As Long, colonne As Long
ligne = rng.Row ' 1
colonne = rng.Column ' 1
```
```vba
Dim adresse As String
adresse = Cells(1, 1).Address(False, False) ' retourne "A1"
```
**Adresse vers Cells :**
```vba
Dim rng As Range
Set rng = Range("A1")
Dim ligne As Long, colonne As Long
ligne = rng.Row ' 1
colonne = rng.Column ' 1
```