Selection.EndKey Unit:=wdStory