ShapeRange.Top Property (Word)
Returns or sets the vertical position of the specified shape or shape range in points. Read/write Single.
Syntax
expression .Top
expression Required. A variable that represents a ShapeRange object.
Remarks
The position of a shape is measured from the upper-left corner of the shape's bounding box to the shape's anchor. The RelativeVerticalPosition property controls whether the shape's anchor is positioned alongside the line, the paragraph, the margin, or the edge of the page.
For a ShapeRange object that contains more than one shape, the Top property sets the vertical position of each shape.
Example
This example sets the vertical position of the first and second shapes in the active document to 1 inch from the top of the page.
With ActiveDocument.Shapes.Range(Array(1, 2))
.RelativeVerticalPosition = wdRelativeVerticalPositionPage
.Top = InchesToPoints(1)
End With