如何用vba拆分word表格？

在word中表格可以拆分。

在vba中，要拆分word表格，可以使用表格对象Table的Split方法。

比如要在一个表格的第3行开始拆分表格，也就是第3行开始成为新的表格的第一行，可以使用如下的代码：

Sub exceloffice()
    '作者QQ：1722187970，微信：xycgenius，微信公众号exceloffice
    Dim oDoc As Document
    Set oDoc = Word.ActiveDocument
    Dim oT As Table
    Dim oT1 As Table
    With oDoc
      '要拆分的表格
       Set oT = .Tables(1)
       With oT
            '返回拆分后下面的表格,从第3行开始分离表格
            Set oT1 = .Split(3)
            Debug.Print oT1.Range.Text
       End With
    End With
End Sub