Excel VBA Función para convertir el número de columna en letra
Function ColName(n)
ColName = Split(Cells(, n).Address, "$")(1)
End Function
Excel Hero
Function ColName(n)
ColName = Split(Cells(, n).Address, "$")(1)
End Function
Function ColumnLetter(pColIndex As Long) As String
ColumnLetter = Replace(Cells(1, pColIndex).Address(True, False), "$1", "")
End Function