Quote Originally Posted by mancubus
not clear.
i you are wanting to populate A1 with the column letter of a cell then
[vba]Range("A1").Value = Left(Range("E1").Address(1, 0), InStr(1, Range("E1").Address(1, 0), "$") - 1)
[/vba]
thank you this is exactly what I need.

I have to say sorry, because the title of this thread is wrong.
The correct one is
range("e1").column = 5 not e