<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>js to excel</title>
<link href="css/style.css" rel="stylesheet" type="text/css">
<style type="text/css">
.tit{
font-size:25px;
}
</style>
<script>
function method1() {//整个表格拷贝到EXCEL中
//检索浏览器
if(navigator.userAgent.indexOf("MSIE")<0){
alert('请用ie浏览器进行表格导出');
return ;
}
var tableid="excel";
var curTbl = document.getElementById(tableid);
var oXL = null;
try {
oXL = GetObject("", "Excel.Application");
}
catch (E) {
try {
oXL = new ActiveXObject("Excel.Application");
}
catch (E2) {
alert("Please confirm:\n1.Microsoft Excel has been installed.\n2.Internet Options=>Security=>Setting \"Enable unsafe ActiveX\"");
return;
}
}
//创建AX对象excel
var oWB = oXL.Workbooks.Add();
//获取workbook对象
var oSheet = oWB.ActiveSheet;
//在此进行样式控制
oSheet.Rows(1+":"+1).RowHeight =20;//定义行高
oSheet.Rows(2+":"+2).RowHeight =30;
//定义列宽
oSheet.Columns('A:A').ColumnWidth = 5;
oSheet.Columns('B:B').ColumnWidth = 10;
oSheet.Columns('C:C').ColumnWidth = 15;
oSheet.Columns('D:D').ColumnWidth = 15;
oSheet.Columns('E:E').ColumnWidth = 38;
oSheet.Columns('F:F').ColumnWidth = 12;
oSheet.Columns('G:G').ColumnWidth = 10;
oSheet.Columns('H:H').ColumnWidth = 15;
oSheet.Rows(1).HorizontalAlignment=3;
var sel = document.body.createTextRange(); //激活当前sheet
sel.moveToElementText(curTbl); //把表格中的内容移到TextRange中
sel.select(); //全选TextRange中内容
sel.execCommand("Copy"); //复制TextRange中内容
oSheet.Paste(); //粘贴到活动的EXCEL中
oXL.Visible = true; //设置excel可见属性
oSheet.Application.Quit(); //结束当前进程
window.opener=null;
window.close();//关闭当前窗口
}
</script>
</head>
<body>
<div >
<input type="button" value="export" οnclick="method1();">
</div>
<table width="1038" border=1 align="center" id="excel" ><!-- style="visibility:hidden;" -->
<tHead>
<tr>
<td colspan="8" ><div align="center" class="tit"><strong>请示登记单 </strong></div></td>
</tr>
<tr>
<td width="90"><div align="center" width="90"><strong>序号</strong></div></td>
<td width="121"><div align="center" width="121"><strong>文件序号</strong></div></td>
<td width="123"><div align="center" width="123"><strong> 文件编号 </strong></div></td>
<td width="123"><div align="center"><strong> 日期 </strong></div></td>
<td width="276"><div align="center"><strong> 标题 </strong></div></td>
<td width="85"><div align="center" width="85""><strong> 备注 </strong></div></td>
</tr>
</tHead>
<tbody>
<tr>
<td align="center"> 1</td>
<td align="center">2008-0202-请示</td>
<td align="center"> </td>
<td align="center"> 2009-5-14 21:38</td>
<td align="center"> gggggg</td>
<td align="center"> </td>
</tr>
<tr>
<td align="center"> 1</td>
<td align="center">2008-0202-请示</td>
<td align="center"> </td>
<td align="center"> 2009-5-14 21:38</td>
<td align="center"> gggggg</td>
<td align="center"> </td>
</tr>
</tbody>
</table>
</body>
</html>