Mefisto...diabeł czy anioł?

Witam,

W Excelu 2007 zarejestrowa³em poni¿sze makro. W 2007 dzia³a jak nale¿y. Niestety w starszych wydaniach niestety ju¿ nie chce. W starszym excelu te¿ próbowa³em zarejestrowaæ podobne makro. Ale w Excelu 2003 wykres z tabeli przestawnej wstawia w nowym arkuszu a mi jest potrzebne w tym w którym jest tabela przestawna. Jak poprawiæ to makro ¿eby zadzia³a³o na starszym wydaniu ?


Private Sub CommandButton3_Click()
    Range("A10").Select
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:=Range("Arkusz2!$A$10:$F$16")
    ActiveWorkbook.ShowPivotChartActiveFields = True
    ActiveChart.ChartType = xlColumnClustered
    ActiveWorkbook.ShowPivotChartActiveFields = False
End Sub

Excel 2003 rejestruje mi poni¿sze makro



Sub Makro1()
    Range("A10").Select
    Charts.Add
    ActiveChart.SetSourceData Source:=Sheets("Arkusz2").Range("A10")
    ActiveChart.Location Where:=xlLocationAsNewSheet
    Sheets("Arkusz2").Select
End Sub
  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • katkaras.opx.pl