Change chart type

Hi all,
I have a workbook that includes a pie chart with name “graph1” on a worksheet. I ask from a user to change the chart type to columns. I need a code that checks if the user makes the right changes or not. I tried the following code without success:

VB Code:

Dim xlap As New Excel.Application 'a reference to excel
With xlap.Charts(“graph1”).Add '<---?? 
If xlap.ActiveChart.ChartType = xlColumnClustered Then 
msgbox “right answer” 
End If 
End With

Please Help!
Thanks in advance

are u doing thin in excel?? or from external app (VB)

I am trying from external VB6 app.

You need to capture the chart instead of adding one..

How many charts are available on the spreadsheet?? This will also depend on whether or not this is a chart on a sheet or a chart sheet...

Ok I found the solution.
Thanks