PictureFormat.OriginalResolution-Eigenschaft (Publisher)
Gibt eine lange, die darstellt, in Punkte pro Zoll (dpi), die mit der die verknüpfte Grafik ursprünglich gescannt wurde Auflösung zurück. Schreibgeschützt.
Syntax
Ausdruck. OriginalResolution
Ausdruck Eine Variable, die ein PictureFormat-Objekt darstellt.
Rückgabewert
Long
Hinweise
Diese Eigenschaft betrifft nur verknüpfte Grafiken. Gibt für Formen, die eingebettete oder eingefügte Grafiken darstellen, "Berechtigung verweigert" zurück.
Verwenden Sie eine der folgenden Eigenschaften, um festzustellen, ob eine Form eine verknüpfte Grafik darstellt:
Mit der EffectiveResolution -Eigenschaft können Sie die Auflösung bestimmen, mit der das Bild oder das OLE-Objekt im angegebenen Dokument gedruckt wird.
Beispiel
Das folgende Beispiel prüft jede Grafik in der aktiven Publikation und gibt ausgewählte Bildeigenschaften für verknüpfte Grafiken zurück.
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: " & .OriginalResolution & " dpi"
End With
End If
Next shpLoop
Next pgLoop
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.