[VBA] Positioning Chart in Powerpoint after copy pasting from Excel

[sanfrandear]

Hi, I'm not sure how to refer to a picture of a chart that was copied from excel and pasted into powerpoint. The macro copies 4 charts in total and pastes them into one slide. I looked at the selection panel and they are named Picture 1, Picture 2, Picture 3 and Picture 4. I tried referring to last pasted picture as an activeshape, but it doesn't work.

oCHT1.CopyPicture   'ActiveChart.ChartArea.Copy
   activeSlide.Shapes.Paste
   
   With activeshape
    .Height = 28.35 * 5 ' resize
    .Width = 28.35 * 11  ' resize
    .Top = 28.35 * 0.75    ' reposition
    .Left = 28.35 * 5.2   ' reposition
    End With

 

[Domenic]

To refer to the last pasted picture, try...

    With activeSlide
        With .Shapes(.Shapes.Count)
            .Height = 28.35 * 5 ' resize
            .Width = 28.35 * 11  ' resize
            .Top = 28.35 * 0.75    ' reposition
            .Left = 28.35 * 5.2   ' reposition
        End With
    End With

Hope this helps!