Inserción de imagen en Excel a través de Macro

26/02/2010 - 12:42 por Zoltar | Informe spam
Buen día, Cibernautas:

Estoy insertando unas fotos a través de código a una hoja. Este hace
referencia al nombre de archivo de la foto y funciona sin problemas.
Sin embargo, pese a que utilizo la instrucción "On Error GoTo XXXX",
me arroja un error 1004, cuando no encuentra el archivo.

Quisiera saber cómo comprobar si existe el nombre del archivo, para
que en ese caso ejecute las intrucciones de insercion.
El código parcial de inserción es:
foto = "C:\FOTOS\" & Range("e6").Value & ".jpg"
On Error GoTo 200
ActiveSheet.Pictures.Insert(foto).Select

Donde "e6" contiene el nombre del archivo de la foto.

Desde ya, muchas gracias.

Atte

CSM

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
26/02/2010 - 18:59 | Informe spam
hola (...), ?????

op1: if dir(foto) <> "" then activesheet.pictures.insert(foto).select

op2: en lugar de on error goto ... usa: on error resume next

saludos,
hector.

__ OP __
Mostrar la cita
#2 Zoltar
08/03/2010 - 21:00 | Informe spam
On 26 feb, 14:59, "Héctor Miguel"
wrote:
Mostrar la cita
Muchas Gracias, Héctor Miguel. Era lo que necesitaba.

Atte

Zoltar
Ads by Google
Search Busqueda sugerida