PictureFormat.FileSize-Eigenschaft (Publisher)

Gibt eine lange, die darstellt, die Größe des Bilds oder OLE-Objekt, wie er in der angegebenen Publikation angezeigt wird, in Bytes zurück. Schreibgeschützt.

Syntax

Ausdruck. FileSize

Ausdruck Eine Variable, die ein PictureFormat-Objekt darstellt.

Rückgabewert

Long

Hinweise

Wenn die Grafik oder das OLE-Objekt verknüpft ist, verwenden Sie die OriginalFileSize -Eigenschaft, um die Größe der verknüpften Datei zu ermitteln.

Um zu bestimmen, ob eine Form ein verknüpftes Bild darstellt, verwenden Sie entweder die Type-Eigenschaft des Shape-Objekts oder die IsLinked-Eigenschaft des PictureFormat-Objekts .

Beispiel

Das folgende Beispiel prüft jede Grafik in der aktiven Publikation und druckt ausgewählte Bildeigenschaften für verknüpfte Grafiken.

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 "Original File Size: " & .OriginalFileSize & " bytes" 
 Debug.Print "File size in publication: " & .FileSize & " bytes" 
 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.