>Hi there
>I'm trying to Automate the creation of an Excel Sheet which contains dbf data
>and charts which refer to them.
>I have problems in creating and settings my chart.
>Here what i do till now
>

>loExcel = CREATEOBJECT("Excel.Application")
>loExcel.APPLICATION.WorkBooks.add()
>*-- Select individual sheet from opened XLS File
>loSheet = loExcel.APPLICATION.WorkBooks(1).Sheets(1)
>
>lnfld = AFields(arfld,'MyTable')
>* add the field name to the sheet from my table
>For i = 1 to lnfld -1
>  loSheet.cells(1,i) = Upper(arfld(i,1))
>EndFor
>
>*- add dbf data to excel sheet
>Select 'MyTable'
>Scan
>  For i = 1 to lnfld -1
>   lcfld = arfld(i,1)
>   loSheet.cells(Recno()+1,i) = &lcfld
>  EndFor
>EndScan 	
>

>
>At this time i'd like to add a graph based on those data.
>What should I do ?
>
>thanks
>Alessio

Alessio,
Start recording a macro and create the Graph. When finish save the macro and post code here :o)