Share via


PictureFormat.OriginalResolution Property

Publisher Developer Reference

Returns a Long that represents, in dots per inch (dpi), the resolution at which the linked picture was originally scanned. Read-only.

Syntax

expression.OriginalResolution

expression   A variable that represents an PictureFormat object.

Return Value
Long

Remarks

This property only applies to linked pictures. 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.

Use the EffectiveResolution property to determine the resolution at which the picture or OLE object prints in the specified document.

Example

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 "Resolution in Publication: " & .EffectiveResolution & " dpi"
                    Debug.Print "Original Resolution: " &amp; .<strong>OriginalResolution</strong> &amp; " dpi"
                    
        End With
    End If
Next shpLoop

Next pgLoop

See Also