将页面导到excel简易方法

function AllAreaExcel() {
var oXL = new ActiveXObject("Excel.Application");
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
var sel=document.body.createTextRange();
sel.moveToElementText(tblExcel);
sel.select();
sel.execCommand("Copy");
oSheet.Paste();
oXL.Visible = true;
}

其中tblExcel是要导出的容器的Id，比如div或table之类的。