thisform.myGraph.ChartArea.Copy() #define wdFormatHTML 8 oWord = createobject('Word.Application') with oWord .Documents.Add .Application.Selection.Paste lcPath = 'c:\temp\' lcFileName = 'myExportedGraph' .ActiveDocument.SaveAs(lcPath+lcFileName+'.htm', wdFormatHTML) .Activedocument.Saved = .T. .quit endwith adir(aGifFILE, lcPath+lcFileName+'_files\*.GIF') wait window 'GIF file name is '+lcPath+lcFileName+'_files\'+aGifFILE[1,1]Code is compatible with Office2000. If you'd use word97 then you can get wdFormatHTML value by iterating through FileFormats. I used word here but you could use another Office component like Excel :) Honestly though if I would do graph instead of gengraph I would create and export using Excel.