Método Shapes.AddPicture (Excel)

Crea una imagen de un archivo existente. Devuelve un objeto Shape que representa la nueva imagen.

Sintaxis

expresión. AddPicture (FileName, LinkToFile, SaveWithDocument, Left, Top, Width, Height)

expresión Variable que representa un objeto Shapes.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
FileName	Necesario	String	Archivo desde el que se va a crear la imagen.
LinkToFile	Obligatorio	MsoTriState	El archivo con el que hay que vincularse. Use msoFalse para que la imagen sea una copia independiente del archivo. Use msoTrue para vincular la imagen al archivo desde el que se creó.
SaveWithDocument	Necesario	MsoTriState	Para guardar la imagen con el documento. Use msoFalse para almacenar solo la información del vínculo en el documento. Use msoTrue para guardar la imagen vinculada con el documento en el que se inserta. Este argumento debe ser msoTrue si LinkToFile es msoFalse.
Left	Obligatorio	Single	Posición (en puntos) de la esquina superior izquierda de la imagen en relación con la esquina superior izquierda del documento.
Top	Obligatorio	Single	La posición (en puntos) del vértice superior izquierdo de la imagen con relación a la parte superior del documento.
Width	Obligatorio	Single	Ancho de la imagen en puntos (escriba -1 para conservar el ancho del archivo existente).
Height	Obligatorio	Single	Alto de la imagen en puntos (escriba -1 para conservar el alto del archivo existente).

Valor devuelto

Shape

Ejemplo:

En este ejemplo se agrega una imagen creada a partir del archivo Music.bmp a myDocument. La imagen insertada está vinculada al archivo desde el que se creó y se guarda con myDocument.

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddPicture _ 
    "c:\microsoft office\clipart\music.bmp", _ 
    True, True, 100, 100, 70, 70

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.