makro copy-paste chart

[ mirjanagb @ 03.02.2010. 08:54 ] @

sa jednim makroom treba po zavrsetku ranje iz jendog excela da kopira grafik u drugi.

on to uradi dobro kad idem samo na copy paste.

ali kad klikne na paste special i kad me pita kao koju sliku hocu da pastuje, (gif, pgn, jpeg...) i kad kliknem na bilo koju, makro radi samo tad. a kad unesem druge podatke uvek mi javi gresku i to samo na tom delu:

Code:
Windows("Simulation.xlsx").Activate
    Range("B36").Select
    ActiveSheet.Paste
    ActiveSheet.ChartObjects("Diagramm 2").Activate
    ActiveChart.ChartArea.Copy
    Range("G47").Select
    [b]ActiveSheet.PasteSpecial Format:="Bild (PNG)", Link:=False, DisplayAsIcon _
        :=False[/b]
    ActiveSheet.ChartObjects("Diagramm 2").Activate
    ActiveChart.Parent.Delete
    Range("C29").Select

jel treba nekako drugacije da napisem to ili ne moze da funkcionise uopste na taj nacin?

hvala unapred na pomoci!!