Compartilhar via


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.