![]() ![]() ![]() ![]() |
|||||
|
|||||
樓主 噓噓 ![]()
![]() |
請問要如何在JavaScript 中使用將所有儲存格加上格線的方法,謝謝 我目前使用的程式如下 <script language="JavaScript"> function saveToExcel(str) { try { var xls = new ActiveXObject("Excel.Application"); xls.Visible = true; } catch(e) { alert("開啟失敗,請確定你的電腦已經安裝excel,且瀏覽器必須允許ActiveX控件執行"); return; } var objTable = document.getElementById(str); var xlBook = xls.Workbooks.Add; var xlsheet = xlBook.Worksheets(1); xlsheet.Range("G1:K1").Select; for (var i=0;i<objTable.rows.length;i++) { for (var j=0;j<objTable.rows[i].cells.length;j++) { if((j==0)||(j==1)) { xlsheet.Cells(i+2,j+1).value = "'" + objTable.rows[i].cells[j].innerHTML; } else { xlsheet.Cells(i+2,j+1).value = objTable.rows[i].cells[j].innerHTML; } } } xlsheet.Columns.AutoFit; -----以下繪製框線的程式無法使用----- xlsheet.Cells.Select; xlsheet.ActiveChart.Borders(xlDiagonalDown).LineStyle = xlNone; xlsheet.ActiveChart.Borders(xlDiagonalUp).LineStyle = xlNone; xlsheet.ActiveChart.Borders(xlEdgeLeft).LineStyle = xlContinuous; xlsheet.ActiveChart.Borders(xlEdgeLeft).Weight = xlThin; xlsheet.ActiveChart.Borders(xlEdgeLeft).ColorIndex = xlAutomatic; xlsheet.ActiveChart.Borders(xlEdgeTop).LineStyle = xlContinuous; xlsheet.ActiveChart.Borders(xlEdgeTop).Weight = xlThin; xlsheet.ActiveChart.Borders(xlEdgeTop).ColorIndex = xlAutomatic; xlsheet.ActiveChart.Borders(xlEdgeBottom).LineStyle = xlContinuous; xlsheet.ActiveChart.Borders(xlEdgeBottom).Weight = xlThin; xlsheet.ActiveChart.Borders(xlEdgeBottom).ColorIndex = xlAutomatic; xlsheet.ActiveChart.Borders(xlEdgeRight).LineStyle = xlContinuous; xlsheet.ActiveChart.Borders(xlEdgeRight).Weight = xlThin; xlsheet.ActiveChart.Borders(xlEdgeRight).ColorIndex = xlAutomatic; xlsheet.ActiveChart.Borders(xlInsideVertical).LineStyle = xlContinuous; xlsheet.ActiveChart.Borders(xlInsideVertical).Weight = xlThin; xlsheet.ActiveChart.Borders(xlInsideVertical).ColorIndex = xlAutomatic; xlsheet.ActiveChart.Borders(xlInsideHorizontal).LineStyle = xlContinuous; xlsheet.ActiveChart.Borders(xlInsideHorizontal).Weight = xlThin; xlsheet.ActiveChart.Borders(xlInsideHorizontal).ColorIndex = xlAutomatic; ---結束---- xlsheet.Range("A1").Select;
搜尋相關Tags的文章:
[ Excel ] ,
本篇文章發表於2005-08-20 18:07 |
1樓 |
換一招看看合不合用
<html>
<body>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="300">
<tr>
<td width="25%">學號</td>
<td width="25%">姓名</td>
<td width="25%">科目</td>
<td width="25%">成績</td>
</tr>
<tr>
<td width="25%">0001</td>
<td width="25%">王小明</td>
<td width="25%">國語</td>
<td width="25%">90</td>
</tr>
<tr>
<td width="25%">0002</td>
<td width="25%">李大名</td>
<td width="25%">國語</td>
<td width="25%">80</td>
</tr>
<tr>
<td width="25%">0003</td>
<td width="25%">趙中明</td>
<td width="25%">國語</td>
<td width="25%">70</td>
</tr>
</table>
<input type="button" name="SaveAs" value="轉存EXCEL檔" onclick="document.execCommand('SaveAs', true, 'test.xls');">
<input type="button" name="SaveAs" value="轉存WORD檔" onclick="document.execCommand('SaveAs', true, 'test.doc');">
<input type="button" name="SaveAs" value="轉存HTM檔" onclick="document.execCommand('SaveAs', true, 'test.htm');">
</body>
</html>
|
2樓
作者回應
噓噓 ![]() |
謝謝,但是我主要是想使用JavaScript將網頁資料傳遞到Excel中,能夠控制Excel顯示格式,因為有些資料是網頁上有但是不需要匯至Excel,反之亦然
不知道有沒有人會使用程式控制,謝謝。 主要是想知道繪製格線,合併儲存格以及控制文字樣式
本篇文章回覆於2005-08-21 22:03
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔-- |
3樓 |
請問一下,<input type="button" name="SaveAs" value="轉存EXCEL檔" onclick="document.execCommand('SaveAs', true, 'test.xls');"> ,檔名設定為test,如果使用者改變了檔名,儲存的檔就不是xls,這該如何解呢?
本篇文章回覆於2006-08-18 14:55
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔-- |
4樓 |
-----以下繪製框線的程式無法使用----- 那段換成底下降子 44 看
本篇文章回覆於2006-08-18 16:14
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔-- |
5樓 |
請問可以把合併儲存格的格式一起匯出嗎?
本篇文章回覆於2015-04-20 19:59
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔-- |
回覆 |
如要回應,請先登入. |