Propriedade PictureFormat.FileSize (Publisher)
Retorna um Long que representa, em bytes, o tamanho da imagem ou objeto OLE como ele aparece na publicação especificada. Somente leitura.
Sintaxe
expressão. Filesize
Expressão Uma variável que representa um objeto PictureFormat .
Valor de retorno
Long
Comentários
Se a imagem ou o objeto OLE for vinculado, use a propriedade OriginalFileSize para determinar o tamanho do arquivo vinculado.
Para determinar se uma forma representa uma imagem vinculada, use a propriedade Type do objeto Shape ou a propriedade IsLinked do objeto PictureFormat .
Exemplo
O exemplo a seguir testa cada imagem da publicação ativa e imprime propriedades da imagem selecionadas para imagens 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
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.