JS将表格导出excel

最新推荐文章于 2024-06-12 13:28:59 发布

yangyang031213

最新推荐文章于 2024-06-12 13:28:59 发布

阅读量617

点赞数

分类专栏： windows API 网页文章标签： activex excel javascript

本文链接：https://blog.csdn.net/yangyang031213/article/details/79023364

版权

windows API 同时被 2 个专栏收录

34 篇文章 7 订阅

订阅专栏

网页

6 篇文章 0 订阅

订阅专栏

需要使用activex，如下代码将 score_table 导出，似乎不用指定版本，任意版本的excel都可以导出。

function SaveAsExcel()
{
    var objTab=document.getElementById("score_table");
    try
    {
        var xls = new ActiveXObject("Excel.Application");
    }
    catch(e)
    {
        alert("要保存为excel，您必须安装Excel电子表格软件，同时浏览器须使用“ActiveX控件”");
        return;
    }
    xls.visible=false;
    var xlBook=xls.Workbooks.Add;
    var xlsheet=xlBook.Worksheets(1);
    var x=1;
    var y=1;
    for(var i=0; i<objTab.rows.length; i++)
    {
        y=1;
        for(var j=0; j<objTab.rows[i].cells.length; j++)
        {
            xlsheet.Cells(x,y).Value=objTab.rows[i].cells[j].innerText;
            xlsheet.Cells(x,y).Borders.LineStyle=1;
            y++;
        }
        x++;
    }
    xlsheet.Columns.AutoFit; //自动适应大小
    try
    {
        var fileSave = new ActiveXObject("MSComDlg.CommonDialog");
        fileSave.Filter=".xls";
        fileSave.FilterIndex=2;
        fileSave.MaxFileSize=128;
        fileSave.ShowSave();
        var savepath=fileSave.FileName+'.xls';
        xlsheet.SaveAs(savepath);
        window.status="Saving as excel to "+savepath+" Success!!!";
    }
    catch(e)
    {
        window.status="call save file dialog failed.";
    }
    xlsheet.Application.Quit();
    return;
}

完整html：

<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gbk"/>
<title></title>
<style type="text/css">
body
{
    overflow:auto
}
</style>
<script type="text/javascript">
function SaveAsExcel()
{
    var objTab=document.getElementById("score_table");
    try
    {
        var xls = new ActiveXObject("Excel.Application");
    }
    catch(e)
    {
        alert("要保存为excel，您必须安装Excel电子表格软件，同时浏览器须使用“ActiveX控件”");
        return;
    }
    xls.visible=false;
    var xlBook=xls.Workbooks.Add;
    var xlsheet=xlBook.Worksheets(1);
    var x=1;
    var y=1;
    for(var i=0; i<objTab.rows.length; i++)
    {
        y=1;
        for(var j=0; j<objTab.rows[i].cells.length; j++)
        {
            xlsheet.Cells(x,y).Value=objTab.rows[i].cells[j].innerText;
            xlsheet.Cells(x,y).Borders.LineStyle=1;
            y++;
        }
        x++;
    }
    xlsheet.Columns.AutoFit; //自动适应大小
    try
    {
        var fileSave = new ActiveXObject("MSComDlg.CommonDialog");
        fileSave.Filter=".xls";
        fileSave.FilterIndex=2;
        fileSave.MaxFileSize=128;
        fileSave.ShowSave();
        var savepath=fileSave.FileName+'.xls';
        xlsheet.SaveAs(savepath);
        window.status="Saving as excel to "+savepath+" Success!!!";
    }
    catch(e)
    {
        window.status="call save file dialog failed.";
    }
    xlsheet.Application.Quit();
    return;
}
</script>
</head>
<body>
<br>
<center>
<table id=score_table border="1px">
<tr>
<td>学生\题目</td>
<td>第1题</td>
<td>第2题</td>
<td>第3题</td>
<td>第4题</td>
</tr>
<tr>
<td><a href="answer_1.htm" target="answer"><b>学生1:</b></a></td>
<td>0.00</td>
<td>0.00</td>
<td>0.00</td>
<td>0.00</td>
</tr>
</table>
</center><input type=button style="visibility:hidden;" id=save_excel onclick="SaveAsExcel();"
</body>
</html>

yangyang031213

关注

0
点赞
踩
1

收藏

觉得还不错? 一键收藏
0
评论
JS将表格导出excel

需要使用activex，如下代码将 score_table 导出，似乎不用指定版本，任意版本的excel都可以导出。function SaveAsExcel(){ var objTab=document.getElementById("score_table"); try { var xls = new ActiveXObject("Excel.Applic
复制链接

扫一扫

专栏目录