By using listi.net you agree to our cookie policy, We and our partners operate globally and use cookies, for multiple purposes

listi.net

 


ColumnLetter

Function ColumnLetter(ColumnNumber As Long) As String
t = Cells(1, ColumnNumber).Address
t = Replace(t, "$1", "")
t = Replace(t, "$", "")
ColumnLetter = t
End Function
blog comments powered by Disqus