Word VisualBasic Script

Sub sel()
    Documents("Tables.doc").Tables(.Tables.Count).Rows.Last.Select
End Sub