2016-02-13 102 views
0

我有一個包含足球統計數據的excel文件,我希望能夠更改excel數字,並且這樣做時網站會自動更新其表格。如何將Excel中的數據插入到html表格中?

有沒有可能的方法來做到這一點?

+0

你在用什麼? PHP的? java嗎? ASP? –

+0

@SariAlalem我正在使用準系統的HTML和CSS,與一些JavaScript?我還沒有開始學習任何PHP等。 –

+2

那麼,爲了能夠處理一個文件(讀取它的數據),你需要一個後端腳本/程序來做到這一點,這可以用php,java等完成。或者你可以使用html5/javascript File API ,這是更困難的,請參閱http://stackoverflow.com/questions/8238407/how-to-parse-excel-file-in-javascript-html5 –

回答

1

這並不能完全回答你的問題,但我想把它作爲一個部分答案。我有一個通用程序(方法),我不時使用它將Excel Table(又名ListObject)轉換爲HTML表格。 Perl有一個出色的模塊,但我從來沒有發現類似於VBA的東西,因此我的手卷代碼。

唯一需要注意的是您的數據必須在表格中。如果它來自RDBMS,那麼最簡單的方法就是通過MS Query將其引入,MS Query會自動將輸出呈現爲Table/ListObject。

我知道你正在談論Web,並沒有提到VBA--只要把它看作是值得的。我希望它有一些有用的組件可以蒐集。

Function TableToHtml(ByRef Table As ListObject, Title As String) As String 

    Dim row As ListRow 
    Dim header, col As range 
    Dim output As String 

    output = _ 
    "<html>" & vbCrLf & _ 
    " <head>" & vbCrLf & _ 
    " <title>" & vbCrLf & _ 
    Title & vbCrLf & _ 
    " </title>" & vbCrLf & _ 
    " </head>" & vbCrLf & _ 
    "<body>" & vbCrLf & _ 
    "<font size=""5"">" & Title & "</font><br><br>" & vbCrLf & _ 
    "<table border='1px' cellpadding='5' cellspacing='0' style='border: solid 1px Black; font-size: small;'>" 

    output = output & "<tr align='center' valign='top'>" & vbCrLf 

    Set header = Table.HeaderRowRange 
    For Each col In header.Columns 
    output = output & " <td align='center' valign='top'>" & col.Value & "</td>" & vbCrLf 
    Next col 

    output = output & "</tr>" & vbCrLf 

    For Each row In Table.ListRows 
    output = output & "<tr align='left' valign='top'>" & vbCrLf 
    For Each col In row.range.Columns 
     output = output & " <td align='center' valign='top'>" & col.Value & "</td>" & vbCrLf 
    Next col 
    output = output & "</tr>" & vbCrLf 
    Next row 

    Dim o As Object 

    output = output & "<tr align='left' valign='top'>" & vbCrLf 
    For Each header In Table.TotalsRowRange 
    output = output & " <td align='center' valign='top'>" & header.Value & "</td>" & vbCrLf 
    Next header 
    output = output & "</tr>" & vbCrLf 

    output = output & "</table>" & vbCrLf & "</body>" & vbCrLf & "</html>" 
    TableToHtml = output 

End Function 

是的,這是非常蠻力的。

+0

還有更簡單的解決方案。您可以將CONCATENATE用於HTML標記,並將它們與HTML一起復制/粘貼到.htm文件中 – IgorM

相關問題