2010-11-02 34 views

Répondre

6

Tools ->Macro ->Record New Macro produit ce code que vous pouvez ensuite modifier à vos besoins spécifiques:

Charts.Add 
ActiveChart.ChartType = xlPie 
ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A1:A4"), PlotBy:= _ 
    xlColumns 
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1" 
ActiveChart.HasTitle = False 
+0

Merci beaucoup qui fonctionne réellement. – Apollon1954

+0

Cheers, mate. Codage heureux. – bernie

+0

Hey mec .. Puis-je demander si vous savez comment mettre la position dans mon tableau? – Apollon1954