指定页面区域内容导入Excel

 

<SCRIPT LANGUAGE="javascript">
function AllAreaExcel()
{
     var oXL = new ActiveXObject("Excel.Application");
     var oWB = oXL.Workbooks.Add();
     var oSheet = oWB.ActiveSheet;
     var sel=document.body.createTextRange();
     sel.moveToElementText(tabletoexcel);//区域ID
     //sel.select();

     sel.execCommand("Copy");
     oSheet.Paste();
     oXL.Visible = true;
}
</SCRIPT>