Height Property Example

This example sets the height of the rows in the first table in the active document to at least 20 points.

ActiveDocument.Tables(1).Rows.Height = 20

This example displays the height (in points) of the table row that contains the insertion point.

If Selection.Information(wdWithInTable) = True Then
    MsgBox Selection.Rows(1).Height
End If

This example changes the height of the active window to fill the application window area.

With ActiveDocument.ActiveWindow
    .WindowState = wdWindowStateNormal
    .Height = Application.UsableHeight
End With

This example inserts a picture as an inline shape and changes the height and width of the image.

Set aInLine = _
    ActiveDocument.InlineShapes.AddPicture( _
    FileName:="C:\Windows\Bubbles.bmp", _
    Range:=Selection.Range)
With aInLine
    .Height = 100
    .Width = 200
End With

This example sets the height of the specified Frameset object to 25% of the window height.

With ActiveWindow.ActivePane.Frameset
    .HeightType = wdFramesetSizeTypePercent
    .Height = 25
End With