VBA Word更改表行和列大小

时间:2017-02-14 09:51:43

标签: excel vba excel-vba ms-word

nested table in Word我有一个模板,在Work中基本上是一个4行的列。每个单元格都标有书签。我已将Excel中的表格复制到Word中的一个书签(单元格内部)。现在我正在尝试格式化这个'嵌套表'以使其适合我想要的列宽(对于某些列)但我真的很难用语法。此外,在表中,第一行包含一些合并的单元格(一些合并到相邻列中的单元格,一些合并在下面的行中)。

我正在尝试的代码:

With wd.Tables(2)
    .Columns(2).Width = 20
End With

但我一直收到“运行时错误'5941':该集合中请求的成员不存在。”这是否意味着我没有正确编制索引?

Tabels(2)是指在4行单元格的较大单列中引用“嵌套表”。

如何正确索引/找到索引? 当我合并单元格时,如何更改宽度? 我需要: 首先划分它们>调整宽度>重新合并? 另外,我在VBA Word中这样做,如果我在Excel中引用'Microsoft Word xx.0 Object Library'我可以在Excel中执行此操作吗?

1 个答案:

答案 0 :(得分:1)

我重新创建了一个像屏幕截图中那样的嵌套表格;即1列4行,然后是行3中的嵌套14列/ 10行表。

以下代码对我来说很合适:

Sub AccessNestedTable()
Dim tbl As Table, tbl2 As Table
Dim wd As Document

Set wd = ActiveDocument

Set tbl = wd.Tables(1)
Set tbl2 = tbl.Tables(1)

With tbl2
    .Columns.Width = 20
End With

End Sub