BCB使用Ole操作Word，怎么移动到具体表格某行，然后新增一行

[liang922]

录制宏:
Sub Macro1()
'
' Macro1 Macro
' 宏在 2015-6-18 由 Test 录制
'
Selection.MoveDown Unit:=wdLine, Count:=7
Selection.MoveRight Unit:=wdCharacter, Count:=7
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.InsertRows 1
Selection.Collapse Direction:=wdCollapseStart
End Sub