utilice esta función de la costumbre VBA

Function NumberToLetter(Number As Integer) As String
Select Case Number
Case Is = 1
NumberToLetter = "A"
Case Is = 2
NumberToLetter = "B"
Case Is = 3
NumberToLetter = "C"
Case Is = 4
NumberToLetter = "D"
Case Is = 5
NumberToLetter = "E"
Case Is = 6
NumberToLetter = "F"
Case Is = 7
NumberToLetter = "G"
Case Is = 8
NumberToLetter = "H"
Case Is = 9
NumberToLetter = "I"
Case Is = 10
NumberToLetter = "J"
Case Is = 11
NumberToLetter = "K"
Case Is = 12
NumberToLetter = "L"
Case Is = 13
NumberToLetter = "M"
Case Is = 14
NumberToLetter = "N"
Case Is = 15
NumberToLetter = "O"
Case Is = 16
NumberToLetter = "P"
Case Is = 17
NumberToLetter = "Q"
Case Is = 18
NumberToLetter = "R"
Case Is = 19
NumberToLetter = "S"
Case Is = 20
NumberToLetter = "T"
Case Is = 21
NumberToLetter = "U"
Case Is = 22
NumberToLetter = "V"
Case Is = 23
NumberToLetter = "W"
Case Is = 24
NumberToLetter = "X"
Case Is = 25
NumberToLetter = "Y"
Case Is = 26
NumberToLetter = "Z"
End Select

End Function



"ADRY" wrote:

me gustaria saber si existe alguna manera en excel donde yo ponga el valor en
numeros en una celda y automaticamente en la celda de lado se vaya poniendo
la cantidad en letras