Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Pictures in Excel file
Message
General information
Forum:
Microsoft Office
Category:
Excel
Miscellaneous
Thread ID:
01182336
Message ID:
01182531
Views:
11
>>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
Previous
Reply
Map
View

Click here to load this message in the networking platform