expression.GetHeight(Unit)
expression Required. An expression that returns one of the objects in the Applies To list.
Unit Required PbUnitType. The units in which to return the height.
| PbUnitType can be one of these PbUnitType constants. |
| pbUnitCM |
| pbUnitEmu |
| pbUnitFeet |
| pbUnitHa |
| pbUnitInch |
| pbUnitKyu |
| pbUnitMeter |
| pbUnitPica |
| pbUnitPoint |
| pbUnitTwip |
Remarks
Use the GetWidth method to return the width of a shape or shape range.
Example
The following example displays the height and width in inches (to the nearest hundredth) of the shape range consisting of all the shapes on the first page of the active publication.
With ActiveDocument.Pages(1).Shapes.Range
MsgBox "Height of all shapes: " _
& Format(.GetHeight(Unit:=pbUnitInch), "0.00") _
& " in" & vbCr _
& "Width of all shapes: " _
& Format(.GetWidth(Unit:=pbUnitInch), "0.00") _
& " in"
End With