To have cursor at the end of the document, try:

.Selection.EndKey(wdStory)


>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