>oExcel.activesheet.Range("D"+TRIM(PADR(nrow,11))).ColumnWidth = 15 >oExcel.activesheet.Range("D"+TRIM(PADR(nrow,11))).value = rpt012->itmcode > >oExcel.activesheet.Range("D"+TRIM(PADR(nrow,11))).ColumnWidth = 40 >oExcel.activesheet.Range("D"+TRIM(PADR(nrow,11))).value = rpt012->desc >>