How to capture Chart in Image Object

Hi

I have a form done in VBA. I have an Image Object in the form. I am
generating a Chart and want to show the Chart on the form - in the Image
Object... Can anyone tell me what is the right syntax?

**************
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "Avg. Profit vs Order Qty."
.Axes(xlCategory, xlPrimary).HasTitle = True
.Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "Order
Qty."
.Axes(xlValue, xlPrimary).HasTitle = True
.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "Avg. Profit"
End With
Image1.??? = ????
*************
This is where the Chart is being generated. I need to assign it to Image1.
But dunno how.


TIA,
Pauline.