Charts.Add ActiveChart.ChartType = xlPie ActiveChart.SetSourceData Source:=Sheets("Sheet11").Range("B4:C99"), PlotBy:= _ xlColumns ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet11" ActiveChart.HasTitle = False
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)