Height 属性

返回或设置指定对象的高度，以磅为单位（除非指定其他度量单位）。如下表所示：

对象	高度
Application	返回或设置活动文档窗口的高度。Long 类型，可读写。
Cell、Cells	返回或设置表格中指定的某一个单元格或某几个单元格的高度。如果指定行的 HeightRule 属性为 wdRowHeightAuto，则 Height 返回 wdUndefined。设置 Height 的属性值将使 HeightRule 设为 wdRowHeightAtLeast。Single 类型，可读写。
CustomLabel	返回或设置指定的自定义邮件标签的高度。Single 类型，可读写。
Frame	返回或设置指定图文框的高度。Single 类型，可读写。
Frameset	返回或设置指定的 Frameset 对象的高度。Float 类型，可读写。HeightType 属性决定表达该值单位的类型。
InlineShape	返回或设置指定的嵌入式图形的高度。Single 类型，可读写。
Row、Rows	返回或设置表格中指定的某一行或某几行的高度。如果指定行的 HeightRule 属性为 wdRowHeightAuto，则 Height 返回 wdUndefined。设置 Height 的属性值将使 HeightRule 设为 wdRowHeightAtLeast。Single 类型，可读写。
Shape、ShapeRange	返回或设置指定图形的高度。Single 类型，可读写。
Task	返回或设置指定任务窗口的高度。Long 类型，可读写。
Window	返回或设置窗口的高度。当窗口处于最小化或最大化时，不能设置此属性。使用 Application 对象的 UsableHeight 属性可决定窗口的最大尺寸。WindowState 属性可用来判定窗口状态。Long 类型，可读写。

对象

高度

Application

返回或设置活动文档窗口的高度。Long 类型，可读写。

Cell、Cells

返回或设置表格中指定的某一个单元格或某几个单元格的高度。如果指定行的 HeightRule 属性为 wdRowHeightAuto，则 Height 返回 wdUndefined。设置 Height 的属性值将使 HeightRule 设为 wdRowHeightAtLeast。Single 类型，可读写。

CustomLabel

返回或设置指定的自定义邮件标签的高度。Single 类型，可读写。

Frame

返回或设置指定图文框的高度。Single 类型，可读写。

Frameset

返回或设置指定的 Frameset 对象的高度。Float 类型，可读写。HeightType 属性决定表达该值单位的类型。

InlineShape

返回或设置指定的嵌入式图形的高度。Single 类型，可读写。

Row、Rows

返回或设置表格中指定的某一行或某几行的高度。如果指定行的 HeightRule 属性为 wdRowHeightAuto，则 Height 返回 wdUndefined。设置 Height 的属性值将使 HeightRule 设为 wdRowHeightAtLeast。Single 类型，可读写。

Shape、ShapeRange

返回或设置指定图形的高度。Single 类型，可读写。

Task

返回或设置指定任务窗口的高度。Long 类型，可读写。

Window

返回或设置窗口的高度。当窗口处于最小化或最大化时，不能设置此属性。使用 Application 对象的 UsableHeight 属性可决定窗口的最大尺寸。WindowState 属性可用来判定窗口状态。Long 类型，可读写。

示例

本示例将活动文档第一张表格的行高度设置为至少 20 磅。

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

本示例显示表格中插入点所在行的高度（以磅为单位）。

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

本示例对活动窗口的高度加以调整，以铺满应用程序的窗口区域。

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

本示例将一张图片作为嵌入式图形插入活动文档，并更改此图片的高度和宽度。

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

本示例将指定框架页的 Frameset 对象的高度设定为窗口高度的 25%。

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