var AppExcel ;
 var OLOldBook,DataSheet,OLNewBook,OLCurSheet;
 var Row ; 
 var KAmountScript = '';
     AppExcel= new ActiveXObject('Excel.Application');  
     Row=1 ; 
     OLOldBook = AppExcel.WorkBooks.Open( 'C:\\ExcelTemplate\\FR0140T1.xlt ');
     var sheet_Number = 1;  
     AppExcel.run('sheet_add', sheet_Number,'銷貨一覽表');  
     AppExcel.run('sheet_active','銷貨一覽表');  
     OLCurSheet = OLOldBook.ActiveSheet; 
OLCurSheet.Cells(5, 1) = 'M100225FHB1' ;  
      OLCurSheet.Cells(5, 2) = 'M100225FHB1' ;  
      OLCurSheet.Cells(5, 3) = 'AMEC' ;  
      OLCurSheet.Cells(5, 4) = '002.06.030' ;  
      OLCurSheet.Cells(5, 5) = '68834.40' ;  
      OLCurSheet.Cells(5, 12) = '67491.200000' ;  
      OLCurSheet.Cells(5, 8) = '469925.56536000' ;  
      OLCurSheet.Cells(5, 15) = '460755.673280000000' ;  
      OLCurSheet.Cells(5, 9) = '00089451' ;  
      OLCurSheet.Cells(5, 10) = '河北蒙特费罗导轨有限公司' ;  
      OLCurSheet.Cells(5, 11) = '001.10.001' ;  
      OLCurSheet.Cells(5, 16) = 'zhengfy' ;  
     KAmountScript += 'OLCurSheet.Range("I5:I7").FormulaR1C1 = "=RC[-1]/1000";';  
     KAmountScript += 'OLCurSheet.Range("I5:I7").NumberFormatLocal = "#,##0.00";';  
     KAmountScript += 'OLCurSheet.Range("Q5:Q7").FormulaR1C1 = "=RC[-1]/1000";';  
     KAmountScript += 'OLCurSheet.Range("Q5:Q7").NumberFormatLocal = "#,##0.00";';     KAmountScript += 'OLCurSheet.Range("H5").FormulaR1C1=6.826900;'; 
   
   
   KAmountScript += 'OLCurSheet.Columns("I5").FormulaR1C1=469925.56536;'; 
   KAmountScript += 'OLCurSheet.Range("H5").FormulaR1C1=6.826900;'; 
   KAmountScript += 'OLCurSheet.Columns("I6").FormulaR1C1=146682.7734;'; 
   KAmountScript += 'OLCurSheet.Range("H6").FormulaR1C1=6.826900;'; 
   这里出说确实 ;结束符号
   KAmountScript += 'OLCurSheet.Columns("I5").FormulaR1C1="=IF(E5<>"",E5,IF(F5<>"",F5,G5))*H5";';