>>Hi everybody,
>>
>>I have an Excel file with two pictures embedded. I'm wondering if there is a way to get these pictures out of it or the only way is to copy them using Paint?
>>
>>Thanks in advance.
>
>Hi Naomi
>
>You can use gpimage.prg (from download here) and then follow this:
>
>oExcel= GETOBJECT(,"Excel.Application")
>xlBitmap=2
>oExcel.Activesheet.pictures(1).CopyPicture(,xlBitmap)
>
>SET PROCEDURE TO gpimage.prg
>gdip = CreateObject("gpInit")
>img = CreateObject("gpImage")
>
>=img.fromclipboard()
>=img.saveasbmp("c:\hi1.bmp")
>
>img=null
>gdip=null
>SET PROCEDURE TO
>
>oExcel=null
>
>
>
>
>
>Good Luck
Thanks, Yuri. I saved them manually through Paint already.
If it's not broken, fix it until it is.
My Blog