Public Sub CodeAscII()
' Pour suivre la façon dont tu as choisis, tu peux fonctionner avec
' le code ascii pour retourner la lettre. A = 65, B= 66 etc...
Dim bytLettre As Byte
For bytLettre = 65 To 91
' Ici je ne sais pas dans quel sens tu vas, car ton fichier
' n'as pas passé. Suit le liens dans ma siganture si tu as des problème.
Cells(bytLettre - 64, 2) = Chr(bytLettre)
Next bytLettre
End Sub