将两个单元格合并在一起的VBA代码

时间:2016-04-07 04:38:22

标签: vba ms-word word-vba word-2013

我的方案是一个包含一个双列表的文档。我正在从数据库中读取并填充每一行/列,但是对于某些记录,我想将两列合并为一个单元格并将其填充为一行,然后继续执行两列方案。我想发出一个VBA语句将两个单元合并在一起,在整个行中创建一个单元。这不可能“记录”为一个新的宏。我不知道在运行时行号是什么,我只知道列号。我的搜索字符串是:'“Word 2013”​​VBA表合并单元格'但是我有很多网站向您展示如何手动执行此操作,而不是使用VBA代码。

我目前的代码:

With ActiveDocument.Tables(1)
.Cell(Row:=1, Column:=1).merge _
MergeTo:=.Cell(Row:=1, Column:=2)
.Borders.Enable = True
End With

在文档中,我有一个包含一行和两列的小表。但我应该能够有一个包含任意列混合的三行表,对吗?我只想选择任意两列并将它们合并在一起以形成一个空格,但在运行时我不知道要提供哪个行号。

0 个答案:

没有答案