批量设置Word文档的表格字体样式及布局

编辑PRD文档遇到导出的表格字体类型,字体大小,表格自适应宽度都不同,如何批量修改?

以下使用VBA脚本进行批量修改,一键完成。

使用VBA脚本,请按照以下步骤操作:

1、在Word中,按下 Alt + F11 打开VBA编辑器。

2、在VBA编辑器中,点击“插入”菜单,然后选择“模块”。

3、在新模块的代码窗口中粘贴上述代码。

4、按下 F5 运行脚本。

批量修改Word(.dox,.docx)所有表格的字体、大小和自适应窗口宽度的VBA脚本:

Sub SetTableFontAndLayout()

    Dim tbl As Table Dim cell As Cell

    ' 遍历文档中的所有表格

    For Each tbl In ActiveDocument.Tables

        ' 设置表格布局为根据窗口自动调整

        tbl.AutoFitBehavior wdAutoFitWindow

            ' 遍历表格中的所有单元格

            For Each cell In tbl.Range.Cells

            ' 设置字体为宋体,大小为五号(10.5磅)

            With cell.Range.Font

                .Name = "宋体"

                .Size = 10.5

            End With

        Next cell

    Next tbl

End Sub

以上脚本会遍历文档中的每个表格,并将每个表格中的所有文本字体设置为"宋体",大小设置为"五号",同时将表格的布局设置为"根据窗口自动调整"。

注意:

这个脚本适用于中文Word文档,如果你的Word文档使用的是其他语言环境,可能需要将"宋体"替换为相应的字体名称。

©著作权归作者所有,转载或内容合作请联系作者
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。

推荐阅读更多精彩内容