Function CLetter(CNumber As Integer) As String
CLetter = Left(Cells(1, CNumber).Address _
(False, False), 1 - (CNumber 26))
End Function
For compatibility with Excel 2007 which has 16384 columns (out to "XFD"),
use
Function CLetter(CNumber As Integer) As String
CLetter = Left(Cells(1, CNumber).Address _
(False, False), 1 - (CNumber 26) - (CNumber 702))
End Function
--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting
www.cpearson.com
(email on the web site)
"Mike H" wrote in message
...
Try this UDF
Function CLetter(CNumber As Integer) As String
CLetter = Left(Cells(1, CNumber).Address _
(False, False), 1 - (CNumber 26))
End Function
call it with =cletter(n)
Mike
"ellebelle" wrote:
I am using this function:
CHAR(MATCH(P$1,$1:$1,)+64)
to get teh column letter, however it does not count double letters past
column z. As in AA AB etc.
Is there a way to get this?
Ellen