>>

>>	oChart = oWorkbook.Charts.Add()
>>	oChart.ChartWizard(m.oSourceRange,  -4102, 4 , 2, 1, 0, .T., [My Chart Title])
>>

>>
>>Collapse(0) collapses the range to a point at the end of the range. Ah, just looked at the code again. Later on, I delete the bookmark.
>>
>>Tamar
>
>Thanks I can do that.
>
>How do I define the oSourceRange (I have to admit that I never grokked the Range thing with automation)?
>
>I have data in A1 to D7. I have code like this:
>
>

LOCAL loXL AS Excel.APPLICATION
>LOCAL loXLWorkbook as EXCEL.Workbook
>
>m.loXL = CREATEOBJECT("Excel.Application")
>m.loXLWorkbook = m.loXL.Workbooks.Add()
>
>m.lnRowCount = 0
>SCAN
>	m.lnRowCount = m.lnRowCount + 1
>	m.loXLWorkbook.ActiveSheet
>	m.loXLWorkbook.ActiveSheet.Cells[m.lnRowCount,1].VALUE = c_TurnaroundChart.Y
>	m.loXLWorkbook.ActiveSheet.Cells[m.lnRowCount,2].VALUE = c_TurnaroundChart.M
>	m.loXLWorkbook.ActiveSheet.Cells[m.lnRowCount,3].VALUE = c_TurnaroundChart.TotalReceived
>	m.loXLWorkbook.ActiveSheet.Cells[m.lnRowCount,4].VALUE = c_TurnaroundChart.AvgTurnaround
>ENDSCAN
>
>
>m.loChart1 = m.loXLWorkbook.Charts.Add()
>				
>m.loSourceRange = m.loXLWorkbook.ActiveSheet.Range("A1:D" + transform(m.lnRowCount))
>m.loChart1.ChartWizard(m.loSourceRange,  -4102, 4 , 2, 1, 0, .T., [My Chart Title])

>
>I get an OLE error: unknown name on this line:
>
>

m.loSourceRange = m.loXLWorkbook.ActiveSheet.Range("A1:D" + transform(m.lnRowCount))

>
>Also, where can I get the parameter values for ChartWizard? The Object Browser only shows three options for the second parameter, none of which are -4102!

It turns out that if I define the Source Range before adding the chart it works!