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

Question

我正在寻找一种方法(或体面的介绍)如何选择Microsoft Word 2013文档中的每个表并自动调整内容.每个表彼此独立并以文本分隔.

到目前为止,我已经建立了以下代码:

Sub autofit()

    Selection.Tables(1).AutoFitBehavior (wdAutoFitContent)

End Sub

哪个适用于单个表和所述表中的每一列,我理解"for循环"的格式,但是想要如何将我的个人选择转换为整个文档.

这是我的第一篇文章,对我错过的任何约定表示歉意.

Answer 1

把它们全部循环都是非常微不足道的;

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