VerticalDistanceFromText Property Example

This example sets the vertical distance between the selected frame and the surrounding text to 12 points.

If Selection.Frames.Count = 1 Then
    Selection.Frames(1).VerticalDistanceFromText = 12
End If

This example adds a frame around the selection and sets several properties of the frame.

Set aFrame = ActiveDocument.Frames.Add(Range:=Selection.Range)
With aFrame
    .HorizontalDistanceFromText = InchesToPoints(0.13)
    .VerticalDistanceFromText = InchesToPoints(0.13)
    .HeightRule = wdFrameAuto
    .WidthRule = wdFrameAuto
End With