Excel VBA - Copy and paste chart

[M3one]

Hi,
I've been struggling with this piece of code. First I must say that I'm not an expert in VBA. I want to copy a chart that it's located in Sheets("Graficos") to a chart object (myChart), modify it and paste it into another sheet (Sheets("Informe")). This is the code that I'm working on but I'm not able to make it work:

    Dim myChart(1 To 100) As Chart
    Dim chartNumber As Integer
    Dim IMC As Double   
    
    'Some code here
    
    ThisWorkbook.Sheets("Graficos").ChartObjects("Chart 2").Activate 'Para evitar error al crear la imagen
    ThisWorkbook.Sheets("Graficos").ChartObjects("Chart 2").Copy
    Set myChart(chartNumber) = ThisWorkbook.Sheets("Informe").Shapes.AddChart(xlLine).Chart
    myChart(chartNumber).ChartObjects.Paste 'THIS IS NOT WORKING'

 

[severynm]

If we look at the documentation for Chart.Paste, you'll notice that it doesn't quite do what you want it to do. You should instead use Range.PasteSpecial or Worksheet.Paste, depending on if you want the paste to be linked to the original data or not. For example to copy chart from the current location to Q1 on Sheet 1,

Sub CopyPasteChart()
    Me.ChartObjects("Chart 1").Copy
    Sheet1.Range("Q1").Select
    ActiveSheet.Paste
End Sub