vba,该如何处理

vba
如何將資料列數字轉化成字母
如：1--A


[解决办法]
thisworkbook.activatesheet.cells(1,2)=chr(int(thisworkbook.activatesheet.cells(1,1))-1+asc( "A "))