用于合并网页中表格和转换写成Excel文件的JS函数，很有用

function AllAreaExcel(tabgrid)
{
 try
 {
  var oXL = new ActiveXObject("Excel.Application");
  var oWB = oXL.Workbooks.Add();
  var oSheet = oWB.ActiveSheet; 
  var sel=document.body.createTextRange();
  sel.moveToElementText(tabgrid);
  sel.select();
  sel.execCommand("Copy");
  oSheet.Paste();
  oXL.Visible = true;
  
//  var oXL = new ActiveXObject("Excel.Application");
//  oXL.Visible = true;
//  //var oWB = oXL.Workbooks.Add();
//  //var oSheet = oWB.ActiveSheet; 
//  var sel=document.body.createTextRange();
//  sel.moveToElementText(tabgrid);
//  sel.select();
//  sel.execCommand("Copy");
//  oXL.Workbooks.Add().Worksheets.Item(1).Paste();
 }
 catch(ex)
 {
  alert("导出失败，可能是IE流览器安全级别过高，如果要继续导出，需要降低IE的安全级别！");
  ShowModelessWindow(AppRootPath+"/FundExhibit/RegDownLoad.aspx", 200, 200, 400, 200, "no", "no", "注册表信息下载页面");
 }
}

上面的是写成Excel的文件函数，需要从IE的安全中，把该网站的网址加入到安全站点中去

  function   doTab(){
   var a=[0,1,8,9,10,11,12]; //要合并的第几列
   y=0;
   htmlStr="";
   for(arr=a.length-1;arr>=0;arr--){
    y=a[arr];
    j=0;
    Flag=0;
  for(i=1;i<tab1.rows.length;i++){
    htmlStr=tab1.rows[i].cells[y].innerText;
    if(tab1.rows[i].cells[y].innerText=="aa"){
      j++;
      continue;
     }
     for(count=i;(count>i-j)&j>0;count--){
      tab1.rows[count].deleteCell(y);
     }
     tab1.rows[count].cells[y].innerText=htmlStr;
     tab1.rows[count].cells[y].colSpan=1;
     tab1.rows[count].cells[y].rowSpan=j+1;
     j=0;
    }
  }
}

上面这个是合并相同值的表格，代码不多，但逻