Convert a column number to its column letter

Function ColLttr(n As Long) as String
'To convert a column number to its corresponding column letter

   ColLttr = Split(Cells(, n).Address,"$")(1)
End Function

For example, ColLttr(29) returns AC.