网上收集的代码

导出到Excel代码

var lie = table.rows(0).cells.length;

// Add table headers going cell by cell.

for (i=0;i<hang;i++)

{

for (j=0;j<lie;j++)

{

//oSheet.Cells(i+1,j+1).Font.Bold = True

//oSheet.Cells(i+1,j+1).Font.Size = 50

//oSheet.Cells(i+1,j+1).Alignment = 2

oSheet.Cells(i+1,j+1).value = table.rows(i).cells(j).innerText;

}
}

oXL.Visible = true;

oXL.UserControl = true;

}

//-->