`
michaeltangbin
  • 浏览: 268914 次
  • 性别: Icon_minigender_1
  • 来自: 黑龙江省
社区版块
存档分类
最新评论

俺用最笨方法做打印(JavaScript调用Excel)

阅读更多
 
 
var xls = new ActiveXObject ( "Excel.Application" );   
	xls.visible = true;   
	var newBook = xls.Workbooks.Add;   
	newBook.Worksheets.Add;   
	newBook.Worksheets(1).Activate;   

                //设定列宽
	newBook.Worksheets(1).Columns("A").columnwidth=10; 

	 //自动换行	   
	newBook.Worksheets(1).Columns("A").WrapText = true;  
                //合并单元格-----合并两列
	newBook.Worksheets(1).Range("A1:H1").merge();   
               //合并两行
newBook.Worksheets(1).Range(newBook.Worksheets(1).Cells(16,1),newBook.Worksheets(1).Cells(17,1)).merge();
               //单元格赋值	
	newBook.Worksheets(1).Range("A1:H1").value="来稿情况统计";  
               //设定字体
	newBook.Worksheets(1).Range("A1:H1").font.size=20; 
                //边框样式
	newBook.Worksheets(1).Cells(2,1).Borders.LineStyle=1;

 

分享到:
评论

相关推荐

Global site tag (gtag.js) - Google Analytics