Maxoverfred
XLDnaute Occasionnel
Comment puis je retrouver la lettre d'une colonne si je connais le numéro ?
Exemple: 7, j'aimerais qu'il me donne la valeur 'G'
Merci
Exemple: 7, j'aimerais qu'il me donne la valeur 'G'
Merci
Sub ColumnLetter()
Dim Cell As Range
Dim ColLetter As String
Dim ColNumber As Integer
Set Cell = ActiveCell
ColLetter = Left(Cell.Address(False, False), (Cell.Column < 27) + 2)
ColNumber = Cell.Column
MsgBox 'La Cellule Active se situe en Colonne ' & ColLetter & vbCrLf & _
'Soit la Colonne Numéro ' & ColNumber
End Sub