Propiedad PictureFormat.OriginalFileSize (Publisher)

Devuelve un Long que representa el tamaño, en bytes, de la imagen vinculada u objeto OLE. Solo lectura.

Sintaxis

expresión. OriginalFileSize

expresión Variable que representa un objeto PictureFormat .

Observaciones

Esta propiedad sólo se utiliza con imágenes vinculadas. Devuelve el error "Permiso denegado" para las formas que representen imágenes incrustadas o pegadas.

Utilice una de las propiedades siguientes para determinar si una forma representa una imagen vinculada:

• La propiedad Type del objeto Shape
• Propiedad IsLinked del objeto PictureFormat

Ejemplo

En el siguiente ejemplo se comprueban las imágenes de la publicación activa y se imprimen las propiedades seleccionadas para las imágenes que estén vinculadas.

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" 
 
 End With 
 End If 
 Next shpLoop 
Next pgLoop 

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.