Réponse acceptée !
reconstitue la chaine qui est dans le range :
y'a certainement plus propre que ca, mais ca a au moins le merite de fonctionner
Dim Ligne As Long
Dim Col As Long
Dim Colonne As String
Dim L1 As String, L2 As String
Ligne = InputBox("ligne") 'entier
Col = InputBox("colonne") 'entier
'transforme N° Col en Lettre
L1 = Col \ 26
L2 = Col Mod 26
If L1 > 0 Then
Colonne = Chr(64 + L1) & Chr(64 + L2)
Else
Colonne = Chr(64 + L1) & Chr(64 + L2)
End If
Range(Ligne & ":" & Ligne & "," & Colonne & ":" & Colonne).Select
BasicInstinct 