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 una cadena que representa el nombre de archivo de la imagen especificada o un objeto OLE. Solo lectura.
Sintaxis
expresión. Nombre
Expresión Variable que representa un objeto PictureFormat .
Valor devuelto
Cadena
Comentarios
Para las imágenes y objetos OLE vinculados, la cadena devuelta representa el nombre y la ruta de acceso completa del archivo de la imagen. Para las imágenes y objetos OLE incrustados, la cadena devuelta sólo representa el nombre de archivo.
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 devuelven las propiedades seleccionadas para cada una de las imágenes de la publicación activa.
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
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.