Compartilhar via

Propriedade PictureFormat.FileName (Publisher)

  • Artigo

Retorna uma cadeia de caracteres que representa o nome de arquivo da imagem especificada ou objeto OLE. Somente leitura.

Sintaxe

expressão. Filename

Expressão Uma variável que representa um objeto PictureFormat .

Valor de retorno

Cadeia de caracteres

Comentários

Para imagens e objetos OLE vinculados, a sequência retornada representa o caminho completo e o nome de arquivo da imagem. Para imagens e objetos OLE incorporados, a sequência retornada representa somente o nome de arquivo.

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 retorna propriedades de imagem selecionadas para cada imagem da publicação ativa.

Dim pgLoop As Page 
Dim shpLoop As Shape 
 
For Each pgLoop In ActiveDocument.Pages 
 For Each shpLoop In pgLoop.Shapes 
 If shpLoop.Type = pbPicture Or shpLoop.Type = pbLinkedPicture Then 
 
 With shpLoop.PictureFormat 
 
 If .IsEmpty = msoFalse Then 
 
 Debug.Print "File Name: " & .FileName 
 Debug.Print "Horizontal Scaling: " & .HorizontalScale & "%" 
 Debug.Print "Vertical Scaling: " & .VerticalScale & "%" 
 Debug.Print "File size in publication: " & .FileSize & " bytes" 
 
 End If 
 
 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.