When referring to ranges in word automation, I am experiencing difficulty collapsing the range. I need to do something like this:

oword = CREATEOBJECT( 'word.application' )
oword.Documents.Add
odoc = oword.ActiveDocument
orange = odoc.range
odoc.Tables.Add( orange, 1,3 )
orange.Collapse(0)
orange.InsertBreak(4)

I am trying to get a page/section break after the table.

I am unable to get the cursor or selection to go to the end of the document so that the insert page break makes a new page.

Please help.

Thanks.

Dave