OJala alguien pueda ayudarme al momento de tratar de pegar una graca que se encuentra dentro del mismo libre pero en otra hoja y pegarla me a parece "Se ha producido el error 1004 en tiempo de ejecucion" el codigo que estoy utilizando es el siguiente:
Sub copygraF()
'
' COPYGRA MTY MENSUAL
Sheets("men").Visible = True
Sheets("men").Select
ActiveChart.ChartArea.Select
ActiveSheet.ChartObjects("1 Gráfico").Activate
ActiveChart.ChartArea.Copy
Sheets("RES").Select
Range("G5").Select
ActiveSheet.PasteSpecial Format:="Imagen (PNG)", Link:=False, _
DisplayAsIcon:=False
Range("F22").Select
End Sub
De antemano gracias por la ayuda