Range to Image with option for location to save

[Jonathan78]

Hello all,

I use the following code to make a PDF file out of an excel range (print area).
I'd like to do the same for an image file (Gif, Jpg or Png)

Can this be done with a popup to select the location to save the image?

[AlphaFrog]

Please Login or Register  to view this content.

[Kenneth Hobson]

For the pdf method:

Please Login or Register  to view this content.

For a 2nd way to do the "jpg" method:
1. Put this into its own Module:

Please Login or Register  to view this content.

2. Similar to the pdf routine:

Please Login or Register  to view this content.

[Jonathan78]

Hello AlphaFrog,

Yours seems to work almost, but the only thing it saves is a white/blank image.

[AlphaFrog]

It worked for me using your Book1.xlsm
Not sure what to tell you.

As a guess, try changing this line...
.CopyPicture xlScreen, xlBitmap

[Jonathan78]

That did not solve the problem unfortunately.
Are there other ways?

It worked for me using your Book1.xlsm
Not sure what to tell you.

As a guess, try changing this line...
.CopyPicture xlScreen, xlBitmap

[AlphaFrog]

The only other way I know of is Ken's method. You'll have to work with him on that. I'm not familiar with it.