您所在位置：主题：请教!如何将MSChart控件生成的统计图输出到Word文件中,谢谢!
ibcasliyi
[专家分：100] 发布于 2008-05-12 13:55:00
在表单中用MSChart控件生成了统计图,想把该统计图输出到一个word文件中,我使用了以下代码,但复制过去的只是数据,而不是统计图,求教各位老师如何才能实现统计图的输出!谢谢!
this.editCopy()
oWord=CREATEOBJECT("Word.application")
oDoc=oWord.Documents
oDoc.Add
savefile=sys(5)+'\'+sys(2003)+"\test.doc"
oWord.Selection.Paste
oWord.ActiveDocument.SaveAs(SaveFile)
oWord.ActiveDocument.Saved=.T.
oWord.ActiveDocument.Close
this.editCopy()
oWord=CREATEOBJECT("Word.application")
oDoc=oWord.Documents
oDoc.Add
savefile=sys(5)+'\'+sys(2003)+"\test.doc"
oWord.Selection.Paste
oWord.ActiveDocument.SaveAs(SaveFile)
oWord.ActiveDocument.Saved=.T.
oWord.ActiveDocument.Close
