ShapeRange.RelativeVerticalPosition (Word)
Especifica a posição vertical relativa de um intervalo de formas. Leitura/gravação WdRelativeHorizontalPosition. Os valores de retorno possíveis são wdRelativeVerticalPositionBottomMarginArea - Em relação à margem inferior, wdRelativeVerticalPositionInnerMarginArea - Em relação à área de margem interna, wdRelativeVerticalPositionLine - Em relação à linha, wdRelativeVerticalPositionMargin - Em relação à margem, wdRelativeVerticalPositionOuterMarginArea - Em relação à área de margem externa, wdRelativeVerticalPositionPage - Em relação à página, wdRelativeVerticalPositionParagraph - Em relação ao parágrafo, wdRelativeVerticalPositionTopMarginArea - Em relação à margem superior.
With Selection.ShapeRange
.Left = InchesToPoints(0.6)
.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
.Top = InchesToPoints(1)
.RelativeVerticalPosition = wdRelativeVerticalPositionParagraph
End With