word中的表格全部设置宽度100%

1、背景

我们用工具将数据库或其他的数据导出成word时,表格有的会大于100%,超过了边界。word没有提供全局修改的方法。如果我们想改成100%。

  • 一种方式是通过宏,全局改。
  • 一种是手动改。

2、宏修改

如果表格多,可以通过这种方式。

  • Word的界面本身没有提供直接选择所有表格的功能,但你可以使用VBA宏来实现。

  • 按下 Alt + F11 打开VBA编辑器。

  • 在"插入"菜单中选择"模块",在打开的代码窗口中输入以下代码:

    Sub SetAllTablesWidthTo100Percent()
    Dim myTable As Table
    Dim i As Long

    复制代码
      ' 确保文档中至少有一个表格
      If ActiveDocument.Tables.Count > 0 Then
          ' 遍历所有表格
          For i = 1 To ActiveDocument.Tables.Count
              Set myTable = ActiveDocument.Tables(i)
              ' 设置表格宽度为100%
              With myTable
                  ' 计算并设置表格的宽度为页面宽度的100%
                  .PreferredWidth = 100
                  ' 如果需要,可以设置表格的宽度类型为百分比
                  ' .WidthType = wdPreferredWidthPercent
              End With
          Next i
      Else
          MsgBox "没有找到表格。"
      End If

    End Sub

  • 关闭VBA编辑器,然后按下 Alt + F8,选择刚才创建的 SelectAllTables 宏,并运行它。

2、手动修改

如果表格少,可以通过这种方式。

  • 导航-结果-表格,会自动找到表格
  • 通过上下键可以向上、向下查找表格。
  • 表布局-自动调整-根据窗口自动调整表格
相关推荐
CNRio6 小时前
将word和excel快速转换为markdown格式
python·word·excel
玩泥巴的2 天前
.NET驾驭Word之力:基于规则自动生成及排版Word文档
c#·word·.net·com互操作
道之极万物灭2 天前
Python操作word实战
开发语言·python·word
跳动的喵尾巴4 天前
Endnote | word中加载项消失不见,如何处理?
word
夜白宋4 天前
【word多文档docx合并】
java·word
Uluoyu6 天前
word、pdf文档内容提取工具类
java·pdf·word
sanshizhang6 天前
word文档转pdf开源免费,可自定义水印
pdf·开源·word
lijingguang6 天前
excel和word文件默认用office打开而不是用wps
word·excel·wps
Uluoyu7 天前
支持Word (doc/docx) 和 PDF 转成一张垂直拼接的长PNG图片工具类
java·pdf·word
VBAMatrix7 天前
报告工具更新!Word附注一键期末转期初
word·办公自动化·审计报告·审计·会计师事务所·报告工具·word附注