合并表格单元格

时间:2013-12-20 11:14:59

标签: vba ms-word word-vba

我需要编写一个宏来合并Word文档中表格的垂直单元格。

我找到了一个例子

With ActiveDocument.Tables(1)
    Set Rng = .Cell(lv_srow, lv_sclm).Range
    Rng.End = .Cell(lv_erow, lv_eclm).Range.End
    Rng.Cells.Merge
End With

此代码适用于水平单元格合并,但它不适用于垂直合并(例如将A1,B1,C1组合为一个单元格)。

1 个答案:

答案 0 :(得分:2)

这应该是双向的...您只需要注意Row中的Column.Cell引用。例如

Horizontal

Vertical