VBA-Excel wklej wykres jako obraz
Tworzę różne wykresy z tego samego źródła. Chciałbym móc wycinać wklej za pomocą vba każdego wykresu jako obrazu. Czy ktoś zna właściwy kod?
Próbowałem z tym, ale to nie działa:
Range("B21:C22").Select
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Range("'Graphs'!$B$21:$C$22")
ActiveChart.ChartType = xl3DPie
ActiveChart.ChartArea.Select
ActiveChart.ChartArea.Copy
ActiveSheet.Pictures.Paste.Select