ChartObjects.Add (Excel)

Creates a new embedded chart.

Add (Left, Top, Width, Height)

Set co = Sheets("Sheet1").ChartObjects.Add(50, 40, 200, 100) 
co.Chart.ChartWizard Source:=Worksheets("Sheet1").Range("A1:B2"), _ 
 Gallery:=xlColumn, Format:=6, PlotBy:=xlColumns, _ 
 CategoryLabels:=1, SeriesLabels:=0, HasLegend:=1

Arguments

The following arguments are required:

Left (Double) - The initial coordinates of the new object (in points), relative to the upper-left corner of cell A1 on a worksheet or to the upper-left corner of a chart.

Top - Double

Width (Double) - The initial size of the new object, in points.

Height - Double