Chinaunix首页 | 论坛 | 博客

沉梦chenmeng.blog.chinaunix.net

首页　| 　博文目录　| 　关于我

chenmeng11

  • 博客访问： 1768343
  • 博文数量： 272
  • 博客积分： 1272
  • 博客等级： 少尉
  • 技术积分： 1866
  • 用 户 组： 普通用户
  • 注册时间： 2011-03-09 15:51
文章分类

全部博文（272）

文章存档

2016年（16）

2015年（28）

2014年（97）

2013年（59）

2012年（25）

2011年（47）

我的朋友
最近访客
推荐博文
js保存为excel

分类： JavaScript

2013-07-27 11:49:45


点击(此处)折叠或打开

  1. <html>
  2.     <body>
  3.     <script language="javascript">
  4.     //导出excel
  5.     function exportExcel(DivID){
  6.      //先声明Excel插件、Excel工作簿等对像
  7.      var jXls, myWorkbook, myWorksheet;
  8.      try {
  9.       //插件初始化失败时作出提示
  10.       jXls = new ActiveXObject('Excel.Application');
  11.      }catch (e) {
  12.       alert("无法启动Excel!\n\n如果您确信您的电脑中已经安装了Excel，"+"那么请调整IE的安全级别。\n\n具体操作：\n\n"+"工具 → Internet选项 → 安全 → 自定义级别 → 对没有标记为安全的ActiveX进行初始化和脚本运行 → 启用");
  13.       return false;
  14.      }
  15.      
  16.      //不显示警告
  17.      jXls.DisplayAlerts = false;
  18.      
  19.      //创建AX对象excel
  20.      myWorkbook = jXls.Workbooks.Add();
  21.      //myWorkbook.Worksheets(3).Delete();//删除第3个标签页(可不做)
  22.      //myWorkbook.Worksheets(2).Delete();//删除第2个标签页(可不做)
  23.      
  24.      //获取DOM对像
  25.      var curTb = document.getElementByIdx_x(DivID);
  26.      
  27.      //获取当前活动的工作薄(即第一个)
  28.      myWorksheet = myWorkbook.ActiveSheet;
  29.      
  30.      //设置工作薄名称
  31.      myWorksheet.name="NP统计";
  32.      
  33.      //获取BODY文本范围
  34.      var sel = document.body.createTextRange();
  35.      
  36.      //将文本范围移动至DIV处
  37.      sel.moveToElementText(curTb);
  38.      
  39.      //选中Range
  40.      sel.select();
  41.      
  42.      //清空剪贴板
  43.      window.clipboardData.setData('text','');
  44.      
  45.      //将文本范围的内容拷贝至剪贴板
  46.      sel.execCommand("Copy");
  47.      
  48.      //将内容粘贴至工作簿
  49.      myWorksheet.Paste();
  50.      
  51.      //打开工作簿
  52.      jXls.Visible = true;
  53.      
  54.      //清空剪贴板
  55.      window.clipboardData.setData('text','');
  56.      jXls = null;//释放对像
  57.      myWorkbook = null;//释放对像
  58.      myWorksheet = null;//释放对像
  59.     }
  60.     </script>
  61.     <input type="button" onClick="exportExcel('tabEnterNpDiv')" value="导出表格">


阅读(1753) | 评论(0) | 转发(0) |
0

上一篇：关于innerHTML、outerHTML和innerText

下一篇：IE 和Firefox的js兼容性总结

给主人留下些什么吧！~~
关于我们 | 关于IT168 | 联系方式 | 广告合作 | 法律声明 | 免费注册

Copyright 2001-2010 ChinaUnix.net All Rights Reserved 北京皓辰网域网络信息技术有限公司. 版权所有

感谢所有关心和支持过ChinaUnix的朋友们

16024965号-6