javascript导出excel -

klxwcx

浏览: 31602 次
性别:
来自: 北京

最近访客更多访客>>

a7056631

ty4747

博主相关

博客

微博

相册

留言

关于我

文章分类

社区版块

存档分类

javascript导出excel

博客分类：

javascript

Excel JavaScript 活动工作

<HTML>
<HEAD>
<TITLE>将页面中指定表格的数据导入到Excel中</TITLE>
<SCRIPT LANGUAGE="javascript">
function AutomateExcel(){
var oExcel = new ActiveXObject("Excel.Application"); //创建Excel对象
var oWork =oExcel.Workbooks.Add();                     //新建一个Excel工作簿
var oSheet =oWork.ActiveSheet;                      //指定要写入内容的工作表为活动工作表
var table =document.all.myTbl;             //指定要写入的数据源的id
var myRow =table.rows.length;              //取数据源行数
var myCell =table.rows(0).cells.length;          //取数据源列数
for(i=0;i<myRow;i++){ //在Excel中写行
for(j=0;j<myCell;j++){ //在Excel中写列
//定义格式
oSheet.Cells(i+1,j+1).Font.Bold =true;   //加粗
oSheet.Cells(i+1,j+1).Font.Size =10;   //字体大小
oSheet.Cells(i+1,j+1).RowHeight =25;   //行高
if(table.rows(i).cells(j).innerHTML.toLowerCase().indexOf('<img')!=-1){ //如果其HTML代码包括<img
oSheet.Cells(i+1,j+1).Select(); //选中Excel中的单元格
oSheet.Pictures.Insert(table.rows(i).cells(j).getElementsByTagName('img')[0].src);
//插入图片
}else{
oSheet.Cells(i+1,j+1).value =table.rows(i).cells(j).innerText;   //向单元格写入值
}
}
}
oExcel.Visible = true;
oExcel.UserControl = true;
}
</SCRIPT>
</HEAD>

<BODY>
<table border="1" width="500" id="myTbl" bgcolor="blue">
<tr bgcolor="white">
<td> 姓名</td>
<td>年龄</td>
<td>地址</td>
<td>照片</td>
</tr>
<tr bgcolor="white">
<td>张三</td>
<td>22</td>
<td>北京海淀</td>
<td><img src="1.gif"border="0"></td>
</tr>
<tr bgcolor="white">
<td>李四</td>
<td>23</td>
<td>上海浦东</td>
<td><Img src="1.gif" border="0"></td>
</tr>
</table>
<input type="button" name="export"onclick="AutomateExcel();" value="导出到Excel">
</BODY>
</HTML>

分享到：