HTML Table表格导出为EXCEL表格（只能保存为XLS文件）

最新推荐文章于 2023-09-23 11:21:22 发布

weixin_30289831

最新推荐文章于 2023-09-23 11:21:22 发布

阅读量181

点赞数

原文链接：http://www.cnblogs.com/nb08611033/p/8288042.html

版权

//HTMLtable表格拷贝到EXCEL中(引用自：https://www.cnblogs.com/zhj-Acmen/p/7298936.html)
//判断浏览器
var idTmr;
function  getExplorer() {
    var explorer = window.navigator.userAgent ;
    //ie
    if (explorer.indexOf("MSIE") >= 0) {
        return 'ie';
    }
    //firefox
    else if (explorer.indexOf("Firefox") >= 0) {
        return 'Firefox';
    }
    //Chrome
    else if(explorer.indexOf("Chrome") >= 0){
        return 'Chrome';
    }
    //Opera
    else if(explorer.indexOf("Opera") >= 0){
        return 'Opera';
    }
    //Safari
    else if(explorer.indexOf("Safari") >= 0){
        return 'Safari';
    }
}
//整个表格拷贝到EXCEL中
function method1(tableid) {
    if($$(tableid).rows.length>2){
        var tbCells=removeCol(tableid);
        $$("btnOutputExcel").disabled="true";
        if(tbCells<15){
            if(getExplorer()=='ie'){
                var curTbl = document.getElementById(tableid);
                var oXL = new ActiveXObject("Excel.Application");
                //创建AX对象excel
                var oWB = oXL.Workbooks.Add();
                //获取workbook对象
                var xlsheet = oWB.Worksheets(1);
                //激活当前sheet
                var sel = document.body.createTextRange();
                sel.moveToElementText(curTbl);
                //把表格中的内容移到TextRange中
                sel.select;
                //全选TextRange中内容
                sel.execCommand("Copy");
                //复制TextRange中内容 
                xlsheet.Paste();
                //粘贴到活动的EXCEL中      
                oXL.Visible = true;
                //设置excel可见属性
                try {
                    var fname = oXL.Application.GetSaveAsFilename("Excel.xls", "Excel Spreadsheets (*.xls), *.xls");
                } catch (e) {
                    print("Nested catch caught " + e);
                } finally {
                    oWB.SaveAs(fname);
                    oWB.Close(savechanges = false);
                    //xls.visible = false;
                    oXL.Quit();
                    oXL = null;
                    //结束excel进程，退出完成
                    idTmr = window.setInterval("Cleanup();", 1);
                }
            }
            else
            {
                tableToExcel('ta');
            }
        }
    }else{
        statusHandle("表内有内容才能导出。");
    }
}
function Cleanup() {
    window.clearInterval(idTmr);
    CollectGarbage();
}
var tableToExcel = (function() {
      var uri = 'data:application/vnd.ms-excel;base64,',
      template = '<html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns="http://www.w3.org/TR/REC-html40"><head><!--[if gte mso 9]><xml><x:ExcelWorkbook><x:ExcelWorksheets><x:ExcelWorksheet><x:Name>{worksheet}</x:Name><x:WorksheetOptions><x:DisplayGridlines/></x:WorksheetOptions></x:ExcelWorksheet></x:ExcelWorksheets></x:ExcelWorkbook></xml><![endif]--></head><body><table>{table}</table></body></html>',
        base64 = function(s) {return window.btoa(unescape(encodeURIComponent(s)))},
        format = function(s, c) {
            return s.replace(/{(\w+)}/g,
            function(m, p) {return c[p];})}
        return function(table, name) {
        if (!table.nodeType) table = document.getElementById("OwnerSummaryTable")
        var ctx = {worksheet: name || 'Worksheet', table: table.innerHTML}
        window.location.href = uri + base64(format(template, ctx))
      }
    })()
//删除操作列
function removeCol(tbName){
    var tb=$$(tbName);
    var tr=tb.insertRow(0);
    tr.innerHTML="<th colspan='14'>"+tb.rows[2].cells[2].innerHTML+"年"+tb.rows[2].cells[3].innerHTML+"表标题</th>";
    var colLen=14;//tb.rows.item(0).cells.length-1;
    for(i=1;i<tb.rows.length;i++){
        tb.rows[i].deleteCell(colLen);
    }
    return tb.rows.item(1).cells.length;
}

//$$
function $$(id) {
    return document.getElementById(id);
}

转载于:https://www.cnblogs.com/nb08611033/p/8288042.html

weixin_30289831

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
复制链接

分享到 QQ

分享到新浪微博

扫一扫