1、新建乙個word文件,命名後儲存到和要合併的1000多篇文件乙個資料夾裡。
2、摁alt+f11進入巨集編輯器。
3、雙擊左上角的thisdocument,在右側的**區貼上**如下:
sub 合併文件()
mypath = activedocument.path
myname = dir(mypath & "\" & "*.doc")
i = 0
do while myname <> ""
if myname <> activedocument.name then
set wb = documents.open(mypath & "\" & myname)
selection.wholestory
selection.copy
windows(1).activate
selection.endkey unit:=wdline
selection.typeparagraph
selection.paste
i = i + 1
wb.close false
end if
myname = dir
loop
end sub
4、執行,等候幾分鐘,即可完成合併
如何合併多個Word文件
方法一 對每個文件手動複製貼上,但是貼上的時候要選保留源格式,這樣貼上之後原來文件的格式就不會變。建議 方法二 以下方法可能會改變文件原來的格式,導致原本兩頁的文件可能變成三頁,或者正文向後偏移。用word開啟其中一篇文件,選中其他文件插入的位置。然後切換到 插入 選項卡,單擊 物件 文字中的文字 ...
WORD文件損壞修復方法
一 文件格式法 在word中開啟損壞的文件,選擇 檔案 另存為 在 儲存型別 列表中,選擇 rtf格式 rtf 然後單擊 儲存 按鈕。關閉損壞的文件,開啟剛才儲存的rtf檔案,選擇 檔案 另存為 在 儲存型別 列表中,選擇 word文件 doc 然後單擊 儲存 按鈕。關閉rtf文件,開啟doc文件。...
Word文件學習
word文件學習第一節 1,設定文件頁面格式 1 設定頁首和頁尾及插入頁碼 頁碼設定 插入選項卡 頁碼 當前位置 注 可以設定頁碼格式 2 文件的分欄及加分割線 word文件 布局 欄 更多欄 分割線打勾 確認 3 藝術字的設定 插入 藝術字 格式 環繞文字 選擇四周型 4 段落新增波浪型下劃線 c...