Excel VBA converti des cellules

' From Cells(1,1) to "A1"
MsgBox Cells(1, 1).Address(RowAbsolute:=False, ColumnAbsolute:=False)

' From "A1" to Cells(1,1)
MsgBox Range("A1").Row & ", " & Range("A1").Column
VasteMonde