DistributeHeight Method

Microsoft Word Visual Basic

Adjusts the height of the specified rows or cells so that they're equal.

expression.DistributeHeight

expression    Required. An expression that returns a Cells or Rows object.

Example

This example adjusts the height of the rows in the first table in the active document so that they're equal.

ActiveDocument.Tables(1).Rows.DistributeHeight
		

This example adjusts the height of the first three rows in the first table so that they're equal.

Dim rngTemp As Range

If ActiveDocument.Tables.Count >= 1 Then
    Set rngTemp = ActiveDocument.Range(Start:=ActiveDocument _
        .Tables(1).Rows(1).Range.Start, _
        End:=ActiveDocument.Tables(1).Rows(3).Range.End)
    rngTemp.Rows.DistributeHeight
End If