Rectangle Object

Represents a portion of text or a graphic in a page. Use the Rectangle object and related methods and properties for programmatically defining page layout in a document.

Using the Rectangle Object

Use the Item method to return a specific Rectangle object. The following example accesses the first rectangle in the first page of the active document.

    Dim objRectangle As Rectangle

Set objRectangle = ActiveDocument.ActiveWindow _
    .Panes(1).Pages(1).Rectangles.Item(1)
  

Use the RectangleType property to determine the type of rectangle. The following example creates a ShapeRange object if the specified rectangle is a shape.

      Dim objRectangle As Rectangle
Dim objShape As ShapeRange

Set objRectangle = ActiveDocument.ActiveWindow _
    .Panes(1).Pages(1).Rectangles.Item(1)
    
If objRectangle.RectangleType = wdShapeRectangle Then
    Set objShape = objRectangle.Range.ShapeRange
End If