如何使用VBA修改表格中的表格

Question

我有创建的表格，我希望能够通过VBA中的代码修改它们。

我需要做的表是合并和调整一些单元格的大小，并将文本添加到一些单元格。

Answer 1

要追加什么兰斯说，这里的这些值合并单元格并设置文本的例子合并的单元格：

Dim myCells As Range 
With ActiveDocument 
    Set myCells = .Range(Start:=.Tables(1).Cell(1, 1).Range.Start, End:=.Tables(1).Cell(1, 3).Range.End) 
    myCells.Select 
End With 

Selection.Cells.Merge 


ActiveDocument.Tables(1).Cell(Row:=1, Column:=1).Range.Text = "Value for Merged Cells" 

注意：此示例中的表有三列两行

Answer 2

您需要访问表的对象，像

ActiveDocument.Tables(1).Cell(Row:=2, Column:=2).Range.Text 

或

<some Word.Document here>. 
    Content.Tables(1).Columns.SetWidth <columnwidthhere>, wdAdjustSameWidth