César Mera respondió:
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...