Selection.SplitTable (Word)
Fügt einen leeren Absatz oberhalb der ersten Zeile in der Markierung ein.
Wenn sich die Markierung nicht in der ersten Zeile der Tabelle befindet, wird die Tabelle in zwei Tabellen geteilt.
If Selection.Information(wdWithInTable) = True Then
Selection.SplitTable
End If