function AutomateExcel()
{
//啟動 Excel 並取得 Application 物件。
var oXL = new ActiveXObject("Excel.Application");
oXL.Visible = true;
// 取得新工作簿。
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
// 逐個儲存格新增表格標題。
oSheet.Cells(1, 1).Value = "First Name";
oSheet.Cells(1, 2).Value = "Last Name";
oSheet.Cells(1, 3). Value = "全名";
oSheet.Cells(1, 4).Value = "工資";
// 將A1:D1 格式設為粗體，垂直對齊= 中心。
oSheet.Range("A1", "D1").Font.Bold = true;
oSheet.Range("A1", "D1").VerticalAlignment = -4108; //xlVAlignCenter
// 建立一個陣列以一次設定多個值。
// 用值陣列填入 A2:B6（來自 VBScript）。
oSheet.Range( "A2", "B6").Value = CreateNamesArray();
//用相對公式填入C2:C6 (=A2 & " " & B2).
var oRng = oSheet.Range ("C2", "C6");
oRng.Formula = "=A2 & " " & B2";
//用公式填入D2:D6(= RAND()*100000)並套用格式。
oRng = oSheet.Range("D2", "D6");
oRng.Formula = "=RAND()*100000";
oRng.NumberFormat = "$0.00";
// 自動調整列A:D.
oRng = oSheet.Range("A1", "D1");
oRng.EntireColumn.AutoFit();
//操作季度銷售資料的可變列數。
DispalyQuarterlySales(oSheet);
// 確保 Excel 可見，並讓使用者控制 Excel 的生命週期
//。
oXL .Visible = true;
oXL.UserControl = true;
}
將頁面中指定表格的資料匯入Excel TITLE><br><script language="javascript"><BR><!--<BR>function AutomateExcel()<BR>{<BR><BR>var oXL = new ActiveXObject("Excel.Application 」）； //建立應該物件<BR>var oWB = oXL.Workbooks.Add();//新建一個Excel工作簿<BR>var oSheet = oWB.ActiveSheet;//指定要寫入內容的活動工作表為工作表<BR>var table = document.all.data;//指定要寫入的資料來源的id<BR>varhang = table.rows.length;//取得資料來源行數<BR>var lie = table. rows (0).cells.length;//取得資料來源列數<BR><BR>//逐個儲存格新增表頭。 <BR>for (i=0;i<hang;i ){//在Excel中寫行<BR>for (j=0;j<lie;j ){//在Excel中寫列<BR>/ /定義格式<BR>oSheet.Cells(i 1,j 1).NumberFormatLocal = "@";<BR>//!!!!!!! 上面這一個單元格的格式定義為文字<BR>oSheet. Cells(i 1,j 1).Font.Bold = true;/ /加粗<BR>oSheet.Cells(i 1,j 1).Font.Size = 10;//字體大小<BR>oSheet.Cells( i 1,j 1).value = table.rows(i). cells(j).innerText;//寫入儲存格值<BR>}<BR>}<BR>oXL.Visible = true;<BR>oXL.UserControl = true;<BR>}<BR>// --><BR></script><br><br>【<br>
編號 |
姓名 td>
年齡 |
性別 |
0001 |
張三 |
22 |
女 |
0002 |
李四 |
23 |
男 |
