RelativeVerticalPosition Property Example
This example adds a frame around the selection and aligns the frame vertically with the top of the page.
Set myFrame = ActiveDocument.Frames.Add(Range:=Selection.Range)
With myFrame
.RelativeVerticalPosition = wdRelativeVerticalPositionPage
.VerticalPosition = wdFrameTop
End With
This example repositions the first shape object in the active document.
With ActiveDocument.Shapes(1)
.Left = InchesToPoints(0.6)
.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
.Top = InchesToPoints(1)
.RelativeVerticalPosition = wdRelativeVerticalPositionParagraph
End With