批量修改Word表格的寬度

怎麼批量修改Word表格的寬度呢。Word表格可根據窗口自動調整表格寬度,使得所有的表格寬度和頁面寬度一樣。當頁面設置了新的頁邊距後,所有的表格都需要調整新的寬度。或者文檔中有許多大大小小的表格,希望寬度全部調整與頁寬一樣。下面的方法就非常有用啦。

  第一步、打開Word文檔,按下【Alt + F11】

怎麼批量修改Word表格的寬度1

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

怎麼批量修改Word表格的寬度2

  第三步、在右側選擇【Document】,再在其右側下拉選擇【Open】

怎麼批量修改Word表格的寬度3

  第四步、然後在宏代碼編輯窗口中,Document_Open()下面輸入以下代碼

  Application.Browser.Target = wdBrowseTable

  For i = 1 To ActiveDocument.Tables.Count

  ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitContent) '根據內容自動調整表格

  ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitWindow) '根據窗口自動調整表格

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

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

  Next i

怎麼批量修改Word表格的寬度4

  第五步、點擊左上方的保存圖標。

怎麼批量修改Word表格的寬度5

  第六步、在彈出的窗口中,點擊【否】,如果文檔已經啓用了宏,就不會出現這個提示對話框了。

怎麼批量修改Word表格的寬度6

  第七步、將文檔另存爲【啓用宏的 Word 文檔】,然後關閉VBA編輯器和當前文檔。

怎麼批量修改Word表格的寬度7

  第八步、找到你剛剛保存的啓用宏的Word文檔,雙擊打開,啓用宏的Word文檔的圖標上,會有一個感嘆號。

怎麼批量修改Word表格的寬度8

  第九步、點擊【啓用內容】,宏代碼開始運行。

怎麼批量修改Word表格的寬度9

  第十步、您會發現,Word中的所有表格,都會自動調整其寬度與頁面寬度一樣啦,而且表格中的內容都居中對齊了。如果不希望居中對齊,就將宏代碼中的水平居中和垂直居中兩行去掉。

怎麼批量修改Word表格的寬度10

注意事項

  VBA是office軟件中強大的自動化語言,可以實現很多自動化的處理。

  如果不喜歡用宏文件,可以將這個啓用宏的Word文檔另存爲不啓用宏的文檔。

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章