【JavaScript】Table內容匯出至Excel

<script language="JavaScript">
function saveToExcel(str) {
   try {
      var xls = new ActiveXObject("Excel.Application");
      xls.Visible = true;
   }
   catch(e) {
      alert("開啟失敗，請確定你的電腦已經安裝excel，且瀏覽器必須允許ActiveX控件執行");
      return;
   }
   var objTable = document.getElementById(str);
   var xlBook = xls.Workbooks.Add;
   var xlsheet = xlBook.Worksheets(1);
   for (var i=0;i<objTable.rows.length;i++)
      for (var j=0;j<objTable.rows[i].cells.length;j++)
         xlsheet.Cells(i+1,j+1).value = objTable.rows[i].cells[j].innerHTML;
}
</script>

部分HTML（參考）
<table border="1" cellpadding="0" cellspacing="0"  width="350" id="table1">
  <tr>
    <td width="25%">學號</td>
    <td width="25%">姓名</td>
    <td width="25%">科目</td>
    <td width="25%">成績</td>
  </tr>
  <tr>
    <td width="25%">0001</td>
    <td width="25%">王小明</td>
    <td width="25%">國語</td>
    <td width="25%">90</td>
  </tr> 
  ...... 中間省略之.......................
    <tr>
    <td width="25%">0005</td>
    <td width="25%">黃小園</td>
    <td width="25%">國語</td>
    <td width="25%">60</td>
  </tr>
</table>
<form name="f1">
  <input type="button" value="匯出至excel" name="B1" onClick="saveToExcel('table1');">
</form>

執行畫面 :

按下按鈕---匯出至Excel :