Navigating

Selection.MoveRight Unit:=wdUnits.wdCharacter, _ 
                    Count:=1 
Selection.MoveRight Unit:=wdUnits.wdLine, _ 
                    Count:=3 

Move to the start of the document

Selection.HomeKey Unit:=wdUnits.wdStory 

Move to the end of the document

Selection.EndKey Unit:=wdUnits.wdStory 

Move to the start of the line

Selection.HomeKey Unit:=wdUnits.wdLine 

Move to the end of the line

Selection.HomeKey Unit:=wdUnits.wdLine 

objRange.Collapse Direction:=wdCollapseDirection.wdCollapseStart 

Select whole document ??

Selection.HomeKey Unit:=wdUnits.wdStory 
Selection.Extend