- 相關(guān)推薦
怎么批量修改Word表格的寬度
怎么批量修改Word表格的寬度呢。Word表格可根據(jù)窗口自動(dòng)調(diào)整表格寬度，使得所有的表格寬度和頁面寬度一樣。當(dāng)頁面設(shè)置了新的頁邊距后，所有的表格都需要調(diào)整新的寬度�；蛘呶臋n中有許多大大小小的表格，希望寬度全部調(diào)整與頁寬一樣。下面的方法就非常有用啦。
第一步、打開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)容自動(dòng)調(diào)整表格
ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitWindow) '根據(jù)窗口自動(dòng)調(diào)整表格
ActiveDocument.Tables(i).Range.ParagraphFormat.Alignment = wdAlignParagraphCenter '水平居中
ActiveDocument.Tables(i).Range.ParagraphFormat.Alignment = wdCellAlignVerticalCenter '垂直居中
Next i
第五步、點(diǎn)擊左上方的保存圖標(biāo)。
第六步、在彈出的窗口中，點(diǎn)擊【否】，如果文檔已經(jīng)啟用了宏，就不會(huì)出現(xiàn)這個(gè)提示對(duì)話框了。
第七步、將文檔另存為【啟用宏的 Word 文檔】，然后關(guān)閉VBA編輯器和當(dāng)前文檔。
第八步、找到你剛剛保存的啟用宏的Word文檔，雙擊打開，啟用宏的Word文檔的圖標(biāo)上，會(huì)有一個(gè)感嘆號(hào)。
第九步、點(diǎn)擊【啟用內(nèi)容】，宏代碼開始運(yùn)行。
第十步、您會(huì)發(fā)現(xiàn)，Word中的所有表格，都會(huì)自動(dòng)調(diào)整其寬度與頁面寬度一樣啦，而且表格中的內(nèi)容都居中對(duì)齊了。如果不希望居中對(duì)齊，就將宏代碼中的水平居中和垂直居中兩行去掉。
注意事項(xiàng)
VBA是office軟件中強(qiáng)大的自動(dòng)化語言，可以實(shí)現(xiàn)很多自動(dòng)化的處理。
如果不喜歡用宏文件，可以將這個(gè)啟用宏的Word文檔另存為不啟用宏的文檔。
【怎么批量修改Word表格的寬度】相關(guān)文章：
怎么修改字體的大小顏色word05-26
利用Word修改教學(xué)設(shè)計(jì)10-03
用fireworks批量對(duì)圖片名稱修改的方法03-21
word如何修改字體的大小顏色08-11
dreamweaver怎么批量替換超鏈接10-02
word中如何修改頁眉中的劃線格式05-12
怎么修改php后綴09-30