getting column name given column number

[Essam]

Is there any built in function in Excel VBA to get the column name given the column number, ie column 63 is "BK" so I need something like

colnam=getcol(63)

and should return "BK" in colnam

Thanks

 

[Andrew Poulsom]

See this posting:

http://www.mrexcel.com/board/viewtopic.php?topic=16130&forum=2

 

[ReportsTeam]

Couldn't find a built in function - had to create a User Fuction for this.

'======================================
Function GetCol(ColumnNumber)

FuncRange = Cells(1, ColumnNumber).AddressLocal(False, False)
'Creates Range (defaults Row to 1) and retuns Range in xlA1 format

FuncColLength = Len(FuncRange)
'finds length of range reference

GetCol = Left(FuncRange, FuncColLength - 1)
'row always "1" therefore take 1 away from string length and you are left with column ref

End Function
'======================================

In a separate Module

Colname = GetCol(63)

Will return Colname as 'BK'

 

[Essam]

Thanks alot, that is very helpfull