<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head id="Head"><title>
javascript 操作 excel 全攻略 - 一切从实用出发! - BlogJava
</title><meta http-equiv="Content-Type" content="text/html; charset=utf-8" /><meta id="metaKeywords" name="keywords" content="javascript 操作 excel 全攻略" /><link id="MainCss" type="text/css" rel="stylesheet" href="http://www.blogjava.net/Skins/绿草蓝天/style.css" /><link id="RSSLink" title="RSS" type="application/rss+xml" rel="alternate" href="http://www.blogjava.net/fool/rss.aspx" /></head>
<body>
<form name="Form1" method="post" action="55285.html" onsubmit="javascript:return WebForm_OnSubmit();" id="Form1">
<div>
<input type="hidden" name="__EVENTTARGET" id="__EVENTTARGET" value="" />
<input type="hidden" name="__EVENTARGUMENT" id="__EVENTARGUMENT" value="" />
<input type="hidden" name="__VIEWSTATE" id="
__VIEWSTATE" value="" />
</div>
<script type="text/javascript">
//<![CDATA[
var theForm = document.forms['Form1'];
if (!theForm) {
theForm = document.Form1;
}
function __doPostBack(eventTarget, eventArgument) {
if (!theForm.onsubmit || (theForm.onsubmit() != false)) {
theForm.__EVENTTARGET.value = eventTarget;
theForm.__EVENTARGUMENT.value = eventArgument;
theForm.submit();
}
}
//]]>
</script>
<script src="/WebResource.axd?d=PyW-m2hLmppJ9byT1bYEqw2&t=633363616222850001" type="text/javascript"></script>
<script language=JavaScript>
function ctlent(evt,id)
{
if(evt.ctrlKey && evt.keyCode == 13)
{
try
{
TempSave(id);
}
catch(ex)
{
}
finally
{
__doPostBack('AjaxHolder$PostComment$btnSubmit','')
}
}
}</script>
<script language=JavaScript>function SetReplyAuhor(author){document.getElementById('AjaxHolder_PostComment_tbComment').value+="@"+author+"\n";document.getElementById('AjaxHolder_PostComment_tbComment').focus();return false}</script>
<script src="/ScriptResource.axd?d=Io4r5Qx-zmHVyf9RpZLpA94PR0yylGVrHR75KduCbtx9Wbjv2jQEzXmeH0no0z7nxVOXJo-onw_3WI2pcwKr3w2&t=633363616222850001" type="text/javascript"></script>
<script src="/ScriptResource.axd?d=Io4r5Qx-zmHysvkgwLW9yk7rUGj5M-geQRTOmI9WMPaWNcTLoZx7IpNZpIR4LFVQ0&t=633065726440000000" type="text/javascript"></script>
<script src="/ScriptResource.axd?d=Io4r5Qx-zmHysvkgwLW9yk7rUGj5M-geQRTOmI9WMPaVSfXvXlH0xWaTv3M_TRDPzVKh75E08VU1&t=633065726440000000" type="text/javascript"></script>
<script type="text/javascript">
//<![CDATA[
function WebForm_OnSubmit() {
if (typeof(ValidatorOnSubmit) == "function" && ValidatorOnSubmit() == false) return false;
return true;
}
//]]>
</script>
<h1><a id="Header1_HeaderTitle" class="headermaintitle" href="http://www.blogjava.net/fool/">一切从实用出发!</a></h1>
<p id="tagline">坚持就是胜利!</p>
<div id="rigthtag"> </div>
<div id="main">
<div class="post">
<h2>
<a id="viewpost1_TitleUrl" href="http://www.blogjava.net/fool/archive/2006/06/27/55285.html">javascript 操作 excel 全攻略</a>
</h2>
<p>最近做一个项目,用到了javascript操纵excel以生成报表,下面是标有详细注解的实例</p>
<p> </p>
<p>
<br /><html></p>
<p><head><br /><script language="javascript" type="text/javascript"></p>
<p>
<br /></script><script language="javascript" type="text/javascript"><br />function MakeExcel(){<br />var i,j;<br /> try {<br /> var xls = new ActiveXObject ( "Excel.Application" );<br /> }<br /> catch(e) {<br /> alert( "要打印该表，您必须安装Excel电子表格软件，同时浏览器须使用“ActiveX 控件”，您的浏览器须允许执行控件。 请点击【帮助】了解浏览器设置方法！");<br /> return "";<br /> }</p>
<p> xls.visible =true; //设置excel为可见</p>
<p> var xlBook = xls.Workbooks.Add;<br /> var xlsheet = xlBook.Worksheets(1);<br /> <!--合并--><br /> xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,7)).mergecells=true;<br /> xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,7)).value="发卡记录";<br /> // xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,6)).Interior.ColorIndex=5;//设置底色为蓝色 <br /> // xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,6)).Font.ColorIndex=4;//设置字体色 <br /> // xlsheet.Rows(1). Interior .ColorIndex = 5 ;//设置底色为蓝色 设置背景色 Rows(1).Font.ColorIndex=4 </p>
<p> <!--设置行高--><br /> xlsheet.Rows(1).RowHeight = 25;<br /> <!--设置字体 ws.Range(ws.Cells(i0+1,j0), ws.Cells(i0+1,j1)).Font.Size = 13 --><br /> xlsheet.Rows(1).Font.Size=14;<br /> <!--设置字体 设置选定区的字体 xlsheet.Range(xlsheet.Cells(i0,j0), ws.Cells(i0,j0)).Font.Name = "黑体" --><br /> xlsheet.Rows(1).Font.Name="黑体";<br /> <!--设置列宽 xlsheet.Columns(2)=14;--></p>
<p> xlsheet.Columns("A:D").ColumnWidth =18;<br /> <!--设置显示字符而不是数字--><br /> xlsheet.Columns(2).NumberFormatLocal="@";<br /> xlsheet.Columns(7).NumberFormatLocal="@";</p>
<p>
<br /> //设置单元格内容自动换行 range.WrapText = true ;<br /> //设置单元格内容水平对齐方式 range.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter;//设置单元格内容竖直堆砌方式<br /> //range.VerticalAlignment=Excel.XlVAlign.xlVAlignCenter<br /> //range.WrapText = true; xlsheet.Rows(3).WrapText=true 自动换行<br /> <br /> //设置标题栏</p>
<p> xlsheet.Cells(2,1).Value="卡号";<br /> xlsheet.Cells(2,2).Value="密码";<br /> xlsheet.Cells(2,3).Value="计费方式";<br /> xlsheet.Cells(2,4).Value="有效天数";<br /> xlsheet.Cells(2,5).Value="金额";<br /> xlsheet.Cells(2,6).Value="所属服务项目";<br /> xlsheet.Cells(2,7).Value="发卡时间";</p>
<p> var oTable=document.all['fors:data'];<br /> var rowNum=oTable.rows.length;<br /> for(i=2;i<=rowNum;i++){<br /> for (j=1;j<=7;j++){<br />//html table类容写到excel</p>
<p> xlsheet.Cells(i+1,j).Value=oTable.rows(i-1).cells(j-1).innerHTML;<br /> }</p>
<p>
<br /> }<br /> <!-- xlsheet.Range(xls.Cells(i+4,2),xls.Cells(rowNum,4)).Merge; --><br /> // xlsheet.Range(xlsheet.Cells(i, 4), xlsheet.Cells(i-1, 6)).BorderAround , 4<br /> // for(mn=1,mn<=6;mn++) . xlsheet.Range(xlsheet.Cells(1, mn), xlsheet.Cells(i1, j)).Columns.AutoFit;<br /> xlsheet.Columns.AutoFit;<br /> xlsheet.Range( xlsheet.Cells(1,1),xlsheet.Cells(rowNum+1,7)).HorizontalAlignment =-4108;//居中<br /> xlsheet.Range( xlsheet.Cells(1,1),xlsheet.Cells(1,7)).VerticalAlignment =-4108;<br /> xlsheet.Range( xlsheet.Cells(2,1),xlsheet.Cells(rowNum+1,7)).Font.Size=10;</p>
<p> xlsheet.Range( xlsheet.Cells(2,1),xlsheet.Cells(rowNum+1,7)).Borders(3).Weight = 2; //设置左边距<br /> xlsheet.Range( xlsheet.Cells(2,1),xlsheet.Cells(rowNum+1,7)).Borders(4).Weight = 2;//设置右边距<br /> xlsheet.Range( xlsheet.Cells(2,1),xlsheet.Cells(rowNum+1,7)).Borders(1).Weight = 2;//设置顶边距<br /> xlsheet.Range( xlsheet.Cells(2,1),xlsheet.Cells(rowNum+1,7)).Borders(2
