Function to convert column number to letter?
This function returns the column letter for a given column number. Function Col_Letter(lngCol As Long) As String Dim vArr vArr = Split(Cells(1, lngCol).Address(True, False), “$”) Col_Letter = vArr(0) End Function testing code for column 100 Sub Test() MsgBox Col_Letter(100) End Sub