使用Word宏选择表中的所有表

Question

我有这些文件，我经常需要格式化，所有数据都存储在大型表格中的表格中，以便进行布局。

如果可以使用宏，我想设置表格中表格的列宽吗？

Answer 1

您可以直接引用嵌套表。使用以下命令，您将获得文档中第一个表中包含的表的数量。

Debug.Print ThisDocument.Tables(1).Tables.Count

然后，您可以循环浏览它们并根据需要对其进行格式化：

Dim oTable as Table

For Each oTable in ThisDocument.Tables(1).Tables

    'Do something with oTable - like
    'setting the width of the first column
    oTable.Columns(1).Width = 60

Next

不要忘记先查看文档中是否有表格。 ：）