辦公自動化-如何使用VBA讀取word的內容到excel?

在檢測行業經常會碰到這樣的一種情況:客戶,尤其是關鍵客戶,希望每個月知道自己在第三方實驗室做了多少份測試,每份測試報告做了哪些測試專案,每個測試專案的測試結果等等資訊。那麼客戶的這種需求就涉及到需要對很多份word的報告(少則幾十份,多則數百份)進行特定資訊的提取並彙總到一張表格。往往這種需求是不能向客戶收費的,屬於一種增值的服務。

這種情況我們通常是怎麼解決呢?大多數的做法是透過加班依靠人工逐份開啟、查詢、複製、貼上。非常耗費時間而且枯燥乏味,為企業帶來額外的人工成本。

其實如果懂得使用excel的VBA功能,那麼這類耗費數天的工作完全可以在幾十分鐘內就可以完成。今天我就給大家講講實現的方式。

實現的思路:

1。 透過遍歷逐分開啟word報告,複製word報告的內容到一張excel表。

2。 根據關鍵詞提取關鍵資訊,對複製到excel表的關鍵資訊進行提取並彙總到另外一張excel表。

設計一張excel表用於裝載word報告的內容,將word格式的內容轉為excel格式,方便後續在excel表上使用vba進行資訊的處理。

辦公自動化-如何使用VBA讀取word的內容到excel?

另設計一張excel表用於處理讀取在excel的資訊,對測試專案進行分類彙總處理。

辦公自動化-如何使用VBA讀取word的內容到excel?

設計單獨一張表為操作介面,透過介面將需要提取的報告號放進指定列,設計按鈕,給按鈕編寫任務程式碼,根據實際的應用場景,分為批次提取和單份提取兩種選項。使用者只需要輸入(單份提取)或批次匯入報告,點選按鈕就可以實現自動提取。

辦公自動化-如何使用VBA讀取word的內容到excel?

實現遍歷Word檔案開啟、讀取和關閉的實現程式碼如下:

辦公自動化-如何使用VBA讀取word的內容到excel?

根據具體情況再設計其它功能的實現,最終的目的 是實現自動化取代人工的資訊提取。大家有什麼類似的問題需要私下探討的可以留言。