Frame.RelativeVerticalPosition (Word)

Specifies the relative vertical position of a frame. Possible return values are wdRelativeVerticalPositionBottomMarginArea - Relative to bottom margin, wdRelativeVerticalPositionInnerMarginArea - Relative to inner margin area, wdRelativeVerticalPositionLine - Relative to line, wdRelativeVerticalPositionMargin - Relative to margin, wdRelativeVerticalPositionOuterMarginArea - Relative to outer margin area, wdRelativeVerticalPositionPage - Relative to page, wdRelativeVerticalPositionParagraph - Relative to paragraph, wdRelativeVerticalPositionTopMarginArea - Relative to top margin.

Set myFrame = ActiveDocument.Frames.Add(Range:=Selection.Range) 
With myFrame 
 .RelativeVerticalPosition = wdRelativeVerticalPositionPage 
 .VerticalPosition = wdFrameTop 
End With