Excel VBA Функция для преобразования номера столбца в букву
Function ColName(n)
ColName = Split(Cells(, n).Address, "$")(1)
End Function
Excel Hero
Function ColName(n)
ColName = Split(Cells(, n).Address, "$")(1)
End FunctionFunction ColumnLetter(pColIndex As Long) As String
ColumnLetter = Replace(Cells(1, pColIndex).Address(True, False), "$1", "")
End Function