convert culomn letter from number

[thread]

Hi All,

I'm trying to convert or to find a way to get the column letter from
its column number index for the range use with vba
any ideas?

 

[Bob Phillips]

'-----------------------------------------------------------------
Function ColumnLetter(Col As Long)
'-----------------------------------------------------------------
Dim sColumn As String
On Error Resume Next
sColumn = Split(Columns(Col).Address(, False), ":")(1)
On Error GoTo 0
ColumnLetter = sColumn
End Function


--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)