怎麼批量修改Word表格的寬度
怎麼批量修改Word表格的寬度呢。Word表格可根據視窗自動調整表格寬度,使得所有的表格寬度和頁面寬度一樣。當頁面設定了新的頁邊距後,所有的表格都需要調整新的寬度。或者文件中有許多大大小小的表格,希望寬度全部調整與頁寬一樣。下面的方法就非常有用啦。
第一步、開啟Word文件,按下【Alt + F11】
第二步、在VBA編輯器視窗的`左上方,雙擊【ThisDocument】
第三步、在右側選擇【Document】,再在其右側下拉選擇【Open】
第四步、然後在巨集程式碼編輯視窗中,Document_Open()下面輸入以下程式碼
et = wdBrowseTable
For i = 1 To t
es(i)FitBehavior (wdAutoFitContent) '根據內容自動調整表格
es(i)FitBehavior (wdAutoFitWindow) '根據視窗自動調整表格
es(i)nment = wdAlignParagraphCenter '水平居中
es(i)nment = wdCellAlignVerticalCenter '垂直居中
Next i
第五步、點選左上方的儲存圖示。
第六步、在彈出的視窗中,點選【否】,如果文件已經啟用了巨集,就不會出現這個提示對話方塊了。
第七步、將文件另存為【啟用巨集的 Word 文件】,然後關閉VBA編輯器和當前文件。
第八步、找到你剛剛儲存的啟用巨集的Word文件,雙擊開啟,啟用巨集的Word文件的圖示上,會有一個感嘆號。
第九步、點選【啟用內容】,巨集程式碼開始執行。
第十步、您會發現,Word中的所有表格,都會自動調整其寬度與頁面寬度一樣啦,而且表格中的內容都居中對齊了。如果不希望居中對齊,就將巨集程式碼中的水平居中和垂直居中兩行去掉。
注意事項
VBA是office軟體中強大的自動化語言,可以實現很多自動化的處理。
如果不喜歡用巨集檔案,可以將這個啟用巨集的Word文件另存為不啟用巨集的文件。