主题：word vba 合并单元格代码如何转换为foxtable代码

以下word vba 合并表格中的单元格代码如何转换为foxtable中可用的代码。

If ActiveDocument.Tables.Count >= 1 Then 
 With ActiveDocument.Tables(1) 
 .Cell(Row:=1, Column:=1).Merge _ 
 MergeTo:=.Cell(Row:=1, Column:=2)  
 End With 
End If