怎么批量修改Word表格的宽度呢。Word表格可根据窗口自动调整表格宽度，使得所有的表格宽度和页面宽度一样。

 

当页面设置了新的页边距后，所有的表格都需要调整新的宽度。或者文档中有许多大大小小的表格，希望宽度全部调整与页宽一样。下面的方法就非常有用啦

iOS 表 cell 自适应 自适应表格_VBA

步骤阅读

 

百度经验:jingyan.baidu.com

工具/原料

  • Word 2013

百度经验:jingyan.baidu.com

方法/步骤

  1. 1
    打开Word文档，按下【Alt + F11】 

    iOS 表 cell 自适应 自适应表格_百度经验_02

    步骤阅读
  2. 2
    在VBA编辑器窗口的左上方，双击【ThisDocument】

    iOS 表 cell 自适应 自适应表格_百度经验_03

    步骤阅读
  3. 3
    在右侧选择【Document】，再在其右侧下拉选择【Open】

    iOS 表 cell 自适应 自适应表格_VBA_04

    步骤阅读
  4. 4然后在宏代码编辑窗口中，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



iOS 表 cell 自适应 自适应表格_iOS 表 cell 自适应_05

步骤阅读

  1. 5
    点击左上方的保存图标

    iOS 表 cell 自适应 自适应表格_百度经验_06

    步骤阅读
  2. 6
    在弹出的窗口中，点击【否】
     
    如果文档已经启用了宏，就不会出现这个提示对话框了

    iOS 表 cell 自适应 自适应表格_百度经验_07

    步骤阅读
  3. 7
    将文档另存为【启用宏的 Word 文档】，然后关闭VBA编辑器和当前文档

    iOS 表 cell 自适应 自适应表格_Word_08

    步骤阅读
  4. 8
    找到你刚刚保存的启用宏的Word文档，双击打开
    启用宏的Word文档的图标上，会有一个感叹号

    iOS 表 cell 自适应 自适应表格_百度经验_09

    步骤阅读
  5. 9
    点击【启用内容】，宏代码开始运行

    iOS 表 cell 自适应 自适应表格_VBA_10

    步骤阅读
  6. 10
    您会发现，Word中的所有表格，都会自动调整其宽度与页面宽度一样啦
     
    而且表格中的内容都居中对齐了。
     
    如果不希望居中对齐，就将宏代码中的水平居中和垂直居中两行去掉

    iOS 表 cell 自适应 自适应表格_百度经验_11

    步骤阅读    END

百度经验:jingyan.baidu.com

注意事项

  • VBA是office软件中强大的自动化语言，可以实现很多自动化的处理
  • 如果不喜欢用宏文件，可以将这个启用宏的Word文档另存为不启用宏的文档