Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Pictures in Excel file
Message
Information générale
Forum:
Microsoft Office
Catégorie:
Excel
Divers
Thread ID:
01182336
Message ID:
01182531
Vues:
12
>>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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform