html中將table資料直接匯入到excel中
方法一、通過<a>標籤（可定義檔名稱）：
<a id="dlink" style="display:none;"></a>
<input type="button" onclick="tableToExcel2('tableMainList', '質控計劃統計結果')" value="Export to Excel" />
匯出到excel方法：
var tableToExcel2 = (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, filename) {
if (!table.nodeType) table = document.getElementById(table)
var ctx = { worksheet: name || 'Worksheet', table: table.innerHTML }
document.getElementById("dlink").href = uri + base64(format(template, ctx));
document.getElementById("dlink").download = filename + ".xls";
document.getElementById("dlink").click();
}
})();
方法二、直接使用<button>標籤：
<input type="button" onclick="excels('tableMainList', '質控計劃統計結果')" value="匯出" />
指令碼：
function getExplorer() {//獲取瀏覽器
var explorer = window.navigator.userAgent;
if (explorer.indexOf("MSIE") >= 0 || (explorer.indexOf("Windows NT 6.1;") >= 0 && explorer.indexOf("Trident/7.0;") >= 0)) {
return 'ie';
} else if (explorer.indexOf("Firefox") >= 0) {
return 'Firefox';
} else if (explorer.indexOf("Chrome") >= 0) {
return 'Chrome';
} else if (explorer.indexOf("Opera") >= 0) {
return 'Opera';
} else if (explorer.indexOf("Safari") >= 0) {
return 'Safari';
}
}
//將table資料直接匯入到excel中
var timer;
function excels(table, fileName) {
if (getExplorer() == 'ie') {
var curTbl = document.getElementById(table);
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 filename = oXL.Application.GetSaveAsFilename("Excel.xls", "Excel Spreadsheets (*.xls), *.xls");
} catch (e) {
window.print("Nested catch caught " + e);
} finally {
oWB.SaveAs(filename);
oWB.Close(savechanges = false);
oXL.Quit();
oXL = null;//結束excel程序，退出完成
timer = window.setInterval("Cleanup();", 1);
}
} else {
tableToExcel(table, fileName);
}
}
function Cleanup() {
window.clearInterval(timer);
CollectGarbage();//CollectGarbage,是IE的一個特有屬性,用於釋放記憶體的
}
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(table);
var ctx = { worksheet: name || 'Worksheet', table: table.innerHTML };
window.location.href = uri + base64(format(template, ctx))
}
})();
注意：IE下需要安裝OFFICE excel才可以匯出。
三、利用外掛：