From the following code and result, how can I convert column index number ‘4’ to column name ‘E’?
REM ***** BASIC *****
Sub Main
GetAddressOfLastCellUsed
End Sub
Sub GetAddressOfLastCellUsed
Dim oSheet As Object
oSheet= thiscomponent.getcurrentcontroller.activesheet
oCursor= oSheet.createCursor
oCursor.gotoEndOfUsedArea(False)
LastColumn= oCursor.RangeAddress.EndColumn
LastRow= oCursor.RangeAddress.EndRow
MSgBox "Cell name at the end of used area is " & LastColumn & LastRow+1 & "."
End Sub