編輯PRD文檔遇到導(dǎo)出的表格字體類型,字體大小,表格自適應(yīng)寬度都不同,如何批量修改?
以下使用VBA腳本進行批量修改,一鍵完成。
使用VBA腳本,請按照以下步驟操作:
1、在Word中,按下?Alt + F11?打開VBA編輯器。
2、在VBA編輯器中,點擊“插入”菜單,然后選擇“模塊”。
3、在新模塊的代碼窗口中粘貼上述代碼。
4、按下?F5?運行腳本。
批量修改Word(.dox,.docx)所有表格的字體、大小和自適應(yīng)窗口寬度的VBA腳本:
Sub SetTableFontAndLayout()
????Dim tbl As Table Dim cell As Cell
????' 遍歷文檔中的所有表格
????For Each tbl In ActiveDocument.Tables
????????' 設(shè)置表格布局為根據(jù)窗口自動調(diào)整
????????tbl.AutoFitBehavior wdAutoFitWindow
????????????' 遍歷表格中的所有單元格
????????????For Each cell In tbl.Range.Cells
????????????' 設(shè)置字體為宋體,大小為五號(10.5磅)
????????????With cell.Range.Font
????????????????.Name = "宋體"
????????????????.Size = 10.5
? ? ? ? ? ? End With
????????Next cell
????Next tbl
End Sub
以上腳本會遍歷文檔中的每個表格,并將每個表格中的所有文本字體設(shè)置為"宋體",大小設(shè)置為"五號",同時將表格的布局設(shè)置為"根據(jù)窗口自動調(diào)整"。
注意:
這個腳本適用于中文Word文檔,如果你的Word文檔使用的是其他語言環(huán)境,可能需要將"宋體"替換為相應(yīng)的字體名稱。