word表格格式統(tǒng)一設(shè)置寬度教程

　　Word表格可根據(jù)窗口自動調(diào)整表格寬度，使得所有的表格寬度和頁面寬度一樣。當(dāng)頁面設(shè)置了新的頁邊距后，所有的表格都需要調(diào)整新的寬度。下面學(xué)習(xí)啦給大家分享word批量修改表格的寬度的方法。

　　word批量修改表格的寬度的方法

　　第一步：打開Word文檔，按下【Alt + F11】

　　第二步：在VBA編輯器窗口的左上方，雙擊【ThisDocument】

　　第三步：在右側(cè)選擇【Document】，再在其右側(cè)下拉選擇【Open】

　　第四步：然后在宏代碼編輯窗口中，Document_Open()下面輸入以下代碼

　　Application.Browser.Target = wdBrowseTable

　　For i = 1 To ActiveDocument.Tables.Count

　　ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitContent) '根據(jù)內(nèi)容自動調(diào)整表格

　　ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitWindow) '根據(jù)窗口自動調(diào)整表格

　　ActiveDocument.Tables(i).Range.ParagraphFormat.Alignment = wdAlignParagraphCenter '水平居中

　　ActiveDocument.Tables(i).Range.ParagraphFormat.Alignment = wdCellAlignVerticalCenter '垂直居中

　　Next i

　　第五步：點擊左上方的保存圖標(biāo)。

　　第六步：在彈出的窗口中，點擊【否】，如果文檔已經(jīng)啟用了宏，就不會出現(xiàn)這個提示對話框了。

　　第七步：將文檔另存為【啟用宏的 Word 文檔】，然后關(guān)閉VBA編輯器和當(dāng)前文檔。

　　第八步：找到你剛剛保存的啟用宏的Word文檔，雙擊打開，啟用宏的Word文檔的圖標(biāo)上，會有一個感嘆號。

　　第九步：點擊【啟用內(nèi)容】，宏代碼開始運行。

　　第十步：您會發(fā)現(xiàn)，Word中的所有表格，都會自動調(diào)整其寬度與頁面寬度一樣啦，而且表格中的內(nèi)容都居中對齊了。如果不希望居中對齊，就將宏代碼中的水平居中和垂直居中兩行去掉。