is there a way to save pictures in a worksheet as graphic filse elsewhere
using VBA?

I need to save pictures in workbooks as separate JPG or GIF files. So far
haven't found a method. Why doesn't the Shape object support saving as
graphic file?

Has anyone ever faced this problem and succeeded?

Alfonso Gonzales

Just use the VBA equivalent of Insert Object


Sub Macro2()

'
Range("D8").Select
ActiveSheet.OLEObjects.Add(Filename:= _
"C:\Documents and Settings\Owner\Desktop\New Folder\DSC_0086.JPG",
Link:= _
False, DisplayAsIcon:=False).Select
End Sub

--
Gary''s Student


"alfonso gonzales" wrote:

is there a way to save pictures in a worksheet as graphic filse elsewhere
using VBA?

I need to save pictures in workbooks as separate JPG or GIF files. So far
haven't found a method. Why doesn't the Shape object support saving as
graphic file?

Has anyone ever faced this problem and succeeded?

Alfonso Gonzales

Hello

Thank you for the code. Perhaps my language wasnt clear enough in specifying
the problem. The solution I need should do the opposite: save a picture FROM
a workbook to a image file.

Alfonso Gonzales


Just use the VBA equivalent of Insert Object


Sub Macro2()

'
Range("D8").Select
ActiveSheet.OLEObjects.Add(Filename:= _
"C:\Documents and Settings\Owner\Desktop\New Folder\DSC_0086.JPG",
Link:= _
False, DisplayAsIcon:=False).Select
End Sub

--
Gary''s Student


"alfonso gonzales" wrote:

is there a way to save pictures in a worksheet as graphic filse elsewhere
using VBA?

I need to save pictures in workbooks as separate JPG or GIF files. So
far
haven't found a method. Why doesn't the Shape object support saving as
graphic file?

Has anyone ever faced this problem and succeeded?

Alfonso Gonzales

Hi Alfonso,

You could copy the picture then paste it onto a chart. Charts have an
Export method that can create a graphic file of what's displayed on the chart.


Regards,
Vic Eldridge


"alfonso gonzales" wrote:

is there a way to save pictures in a worksheet as graphic filse elsewhere
using VBA?

I need to save pictures in workbooks as separate JPG or GIF files. So far
haven't found a method. Why doesn't the Shape object support saving as
graphic file?

Has anyone ever faced this problem and succeeded?

Alfonso Gonzales

Hi alfonso

Save the file as a webpage and you will get a htm file and a folder with the pictures

--
Regards Ron de Bruin
http://www.rondebruin.nl


"alfonso gonzales" wrote in message ...
is there a way to save pictures in a worksheet as graphic filse elsewhere using VBA?

I need to save pictures in workbooks as separate JPG or GIF files. So far haven't found a method. Why doesn't the Shape object
support saving as graphic file?

Has anyone ever faced this problem and succeeded?

Alfonso Gonzales