如何使用 VBA 宏选择 Microsoft Word 文档中的每个表格答案

【问题标题】：How to select every table in a Microsoft Word document using VBA Macro如何使用 VBA 宏选择 Microsoft Word 文档中的每个表格
【发布时间】：2014-12-18 17:18:02
【问题描述】：

我正在寻找一种方法（或体面的介绍）来了解如何选择 Microsoft Word 2013 文档中的每个表格并自动调整内容。每个表格相互独立，并由文本分隔。

到目前为止，我已经建立了以下代码：

Sub autofit()

    Selection.Tables(1).AutoFitBehavior (wdAutoFitContent)

End Sub

这适用于单个表格和所述表格中的每一列，我了解“for 循环”的格式，但想了解如何将我的个人选择转换为整个文档。

这是我的第一篇文章，因此对我错过的任何约定表示歉意。

【问题讨论】：

标签： vba ms-word

【解决方案1】：

将它们全部循环起来非常简单；

Dim t As Table
For Each t In ActiveDocument.Tables
    t.AutoFitBehavior wdAutoFitContent
Next

【讨论】：

太好了，谢谢，我不知道的是 ActiveDocument。基本我知道，但我对 VBA 完全陌生。