This documentation is archived and is not being maintained.

PictureFormat.OriginalHeight Property

Office 2007
Returns a Variant representing the height, in points, of the specified linked picture or OLE object. Read-only.



expression   A variable that represents an PictureFormat object.

Return Value


This property applies only to linked pictures or OLE objects. Returns "Permission Denied" for shapes representing embedded or pasted pictures.

To determine whether a shape represents a linked picture, use either the Type property of the Shape object, or the IsLinked property of the PictureFormat object.


The following example tests each picture in the active publication, and returns selected image properties for pictures that are linked.

Visual Basic for Applications
Dim pgLoop As Page
Dim shpLoop As Shape

For Each pgLoop In ActiveDocument.Pages
    For Each shpLoop In pgLoop.Shapes
        If shpLoop.Type = pbLinkedPicture Then
            With shpLoop.PictureFormat
                        Debug.Print "File Name: " & .Filename
                        Debug.Print "Horizontal Scaling: " & .HorizontalScale & "%"
                        Debug.Print "Original Image Height: " & .OriginalHeight & " points"
                        Debug.Print "Height in publication: " & .Height & " points"
            End With
        End If
    Next shpLoop
Next pgLoop