Macro en excel

Tengo 2 hojas excel, en la hoja 1, hay 2 gráficos, la macro debe cortar el gráfico de la hoja 1 y pasarlo a la hoja 2.
Creo una macro mediante grabar macro, luego la ejecuto pero no funciona, sale el error: ActiveSheet.ChartObjects("Gráfico 2").Activate

1 respuesta

Respuesta
1
Prueba este código y me cuentas como te fue.
Sub CopiarGrafico()
'
' CopiarGrafico macro grabada por Cesar Mera el 21/05/2003
ActiveSheet.ChartObjects(1).Activate
ActiveChart.ChartArea.Select
ActiveChart.ChartArea.Copy
Sheets("Hoja2").Select
Range("E5").Select
ActiveSheet.Paste
Sheets("Hoja1").Select
ActiveSheet.ChartObjects(1).Delete
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas