Cells.DistributeHeight Method (Word)
Adjusts the height of the specified cells so that they are equal.
Syntax
expression .DistributeHeight
expression Required. A variable that represents a Cells collection.
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