Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Devuelve un Long que representa, en bytes, el tamaño de la imagen u objeto OLE como aparece en la publicación especificada. Solo lectura.
Sintaxis
expresión. FileSize
expresión Variable que representa un objeto PictureFormat .
Valor devuelto
Long
Observaciones
Si la imagen u objeto OLE está vinculado, utilice la propiedad OriginalFileSize para determinar el tamaño del archivo vinculado.
Para determinar si una forma representa una imagen vinculada, use la propiedad Type del objeto Shape o la 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"
Debug.Print "File size in publication: " & .FileSize & " 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.