Maybe if you don't close excel before the paste (just a wild guess)
>Hi,
>
>I am trying to create a chart in Excel and then place it in a Word document.
>
>I have created the chart and put a bookmark in the document, but the image of the chart is not pasted where the bookmark is. Here's my code:
>
>

loWord = CREATEOBJECT("Word.Application")
>SCAN 
>	loWord.Documents.Add("GroupPlan.dot")
>	m.loDoc = m.loWord.ActiveDocument
>	
>	objXLsheet=CreateObject("Excel.Sheet")
>
>	* Excel 97 Automation change
>	* CreateObject() returns Object instead of Sheet1
>	IF UPPER(objXLsheet.Name)= "OBJECT"
>		lHasExcel97 = .T.
>		objXLsheet = objXLsheet.Sheets[1]
>	ELSE
>		lHasExcel97 = .F.
>	ENDIF
>
>	m.lnRowCount = 0
>	SCAN 	
>		m.lnRowCount = m.lnRowCount + 1 
>		objXLsheet.Cells[m.lnRowCount,1].Value = c_TurnaroundChart.Y
>		objXLsheet.Cells[m.lnRowCount,2].Value = c_TurnaroundChart.M
>		objXLsheet.Cells[m.lnRowCount,3].Value = c_TurnaroundChart.TotalReceived
>		objXLsheet.Cells[m.lnRowCount,4].Value = c_TurnaroundChart.AvgTurnaround
>	ENDSCAN
>	
>	objChart1 = objXLsheet.ChartObjects.Add(100, 100, 200, 200)
>
>	objxlsheet.chartobjects(1).chart.;
>		chartwizard(objxlsheet.range(objxlsheet.cells(1,1),objxlsheet.cells(m.lnRowCount,4)),;
>		-4100,4,1,0,1,1,"","","","")
>	*!*	objXLsheet.application.visible=.T.
>
>	ObjXLsheet.ChartObjects(1).select
>	ObjXLsheet.ChartObjects(1).copy
>
>	IF !m.lHasExcel97
>		objXLsheet.application.quit
>	ENDIF
>	release objXLsheet
>
> 	IF m.loDoc.Bookmarks.EXISTS("TurnAroundChart")
>		m.loDoc.Bookmarks("TurnAroundChart").SELECT
>		m.loDoc.APPLICATION.Selection.Paste()	&&.PasteSpecial(,,,,'PICT')
>	ENDIF
>