Any "InsertRowsBelow" in Tables Object?

[tinfanide]

Sub t()

With ActiveDocument
    With .Tables(1)
        .Rows(.Rows.Last.Index).Select
        With Selection
            .InsertRowsBelow 1
        End With
        .Rows(.Rows.Last.Index).Range.Text = "newly added last row in this table"
    End With
End With

End Sub

There is

ActiveDocument.Tables(1).Rows.Add [BeforeRow As Row]

in the Tables Object. But just wonder if I can insert rows after a row.

[macropod]

Hi tinfanide,

There is no equivalent to '.InsertRowsBelow' for the table object. However, you probably don't need it. To add a new last row, simply use:
ActiveDocument.Tables(1).Rows.Add
To insert a row after a specific row, use something like:
ActiveDocument.Tables(1).Rows(2).Range.Rows.Add

[tinfanide]

A lovely one.
Never thought it was just simple as that.
Thank you.