四、使用巨集(適用于大量資料處理且有一定程式設計基礎的情況)
1. 編寫VBA宏代碼 如果熟悉VBA程式設計,在Word中可以編寫巨集來提取資料並構建Excel表格。例如,通過遍歷Word文檔中的段落或表格儲存格,將資料按照一定規則寫入到Excel物件中。以下是一個簡單的示例代碼框架: Sub WordToExcel()
Dim xlApp As Object
Dim xlWB As Object
Dim xlSheet As Object
Dim para As Paragraph
Set xlApp = CreateObject("Excel.Application")
Set xlWB = xlApp.Workbooks.Add
Set xlSheet = xlWB.Sheets(1)
For Each para In ActiveDocument.Paragraphs
'這裡根據實際需求處理段落中的資料並寫入Excel
xlSheet.Cells(行號, 列號).Value = para.Range.Text
Next para
xlWB.SaveAs "轉換後的檔路徑.xlsx"
xlWB.Close
xlApp.Quit
End Sub
運行巨集後即可將Word中的資料轉換為Excel表格並保存。