Word插入檔案 VBA 合併 檔案

2021-04-24 14:27:07 字數 1065 閱讀 5315

(1)word中有的時候,需要合併多個檔案。word本身提供了非常簡單的方法。只需使用選單「插入->檔案」命令即可完成該操作。

vba**:selection.range.insertfile(afilename, '', false, false, false);

(2)可是會遇到一點問題 插入的檔案,為啥不頁首資訊丟失了。

如:我插入的檔案某些頁面是橫向,但是現在插入後,不是橫向的

其實解決這個問題,是很容易的,那就是在插入檔案的時候,選擇「鏈結」方式插入,如下圖

(3)可新的問題又來了,鏈結方式插入的檔案,有灰色的底色,很難看。怎麼辦呢?

通常情況下,word會將使用者選定的域採用灰色背景進行顯示(在列印時灰色背景不會列印出來),這主要是由於"域底紋"選項在發揮作用。如果使用者不希望採用這種顯示方法,則可執行"工具"選單中的"選項"命令,然後在"檢視"選項卡的"域底紋"框中選擇"不顯示"選項即可取消其顯示。

vba**:activewindow.view.fieldshading := wdfieldshadingnever;

(4)因為插入鏈結的方式,其實是間接的使用word的插入檔案域「includetext」,這也就可能造成「域巢狀太深」的錯誤。其實解決方法也很簡單,就是斷開鏈結,也就相當於減少了乙個域。所以也就不會「域巢狀太深」了^_^。具體操作為:在選單「編輯->鏈結」中,斷開鏈結源即可。

vba**:activedocument.fields.item(1).linkformat.breaklink;

Word插入檔案 VBA 合併 檔案

1 word中有的時候,需要合併多個檔案。word本身提供了非常簡單的方法。只需使用選單 插入 檔案 命令即可完成該操作。vba selection.range.insertfile afilename,false,false,false 2 可是會遇到一點問題 插入的檔案,為啥不頁首資訊丟失了。如...

合併多個word檔案

unit wordoperate 2008 10 inte ce uses sysutils,comobj,shellapi,windows 合併多個word檔案,存到乙個指定檔案裡 引數說明 arrword 為帶路徑的word檔名稱陣列 outfilename 為合併後的檔名稱 binsertpa...

VBA讀取檔案

首先我們需要認識幾個相關定義 filesystemobject 檔案系統定義 set fs createobject scripting.filesystemobject set a fs.createtextfile c testfile.txt true a.writeline this is ...