Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Excel » Error al copiar rango como imagen

Excel - Error al copiar rango como imagen

Volver
Nuevo Tema
<<>>
 
Vista:
Mensajes realizados anteriormente (No estaban la última vez que entraste)Error al copiar rango como imagen
Vanessa Elisa (17/12/2019 23:04:56)178 visitas
1 respuesta
Mensajes realizados anteriormente (No estaban la última vez que entraste)Error al copiar rango como imagen
Dirk (18/12/2019 20:55:43)
sin imagen de perfil
Val: 16
Ha aumentado su posición en 5 puestos en Excel (en relación al último mes)
Gráfica de Excel

Error al copiar rango como imagen

Publicado por Vanessa Elisa (11 intervenciones) el 17/12/2019 23:04:56
Hola a todos

Necesito ayuda con una macro que lo que hace es copiar un rango de celdas y pegarlas en otra hoja como imagen
el error que me aparece es:

Se ha producido el error 1004 en tiempo de ejecución: Microsoft Excel no puede pegar los datos.

El error me aparece en la linea:

ActiveSheet.Paste

Lo curioso es que al darle depurar y presionar F8 ya no marca error

Les comparto la fracción del código donde me aparece el error

1
2
3
4
Range("a1:i50").CopyPicture Appearance:=xlScreen
Sheets ("Reporte").Select
Range("a1").Select
ActiveSheet.Paste

De antemano agradezco cualquier ayuda que me puedan brindar

Saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Dirk
Val: 446
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

Error al copiar rango como imagen

Publicado por Dirk (166 intervenciones) el 18/12/2019 20:55:43
Hola Vanesa, prueba con esto:

1
2
3
4
5
6
Range("A1:I50").Select
Selection.Copy
Sheets("Reporte").Select
ActiveSheet.Range("A1").Select
ActiveSheet.Pictures.Paste.Select
Application.CutCopyMode = False

Salu2
Dirk
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar