VerticalAnchor Property Example

This example sets the alignment of the text in shape one on myDocument to top centered.

Set myDocument = ActivePresentation.SlideMaster
With myDocument.Shapes(1)
    .TextFrame.HorizontalAnchor = msoAnchorCenter
    .TextFrame.VerticalAnchor = msoAnchorTop
End With