Savepicture
 

I found this code on a website and that will copy a range as a picture. I
also need it too save it as a picture on our network. Can you help?
Worksheets("Sheet1").Range("A3:D12").CopyPicture _
Appearance:=xlScreen, Format:=xlBitmap

Savepicture
 

Not sure which version of XL you are using, but you could turn on the macro
recorder and print to a .tif. Set the printer name to MODI (Microsoft
Document Image Writer) and pick your file destination.

HTH


"Wike05" wrote:

I found this code on a website and that will copy a range as a picture. I
also need it too save it as a picture on our network. Can you help?
Worksheets("Sheet1").Range("A3:D12").CopyPicture _
Appearance:=xlScreen, Format:=xlBitmap

Savepicture
 

Excel 2002

"XP" wrote:


Not sure which version of XL you are using, but you could turn on the macro
recorder and print to a .tif. Set the printer name to MODI (Microsoft
Document Image Writer) and pick your file destination.

HTH


"Wike05" wrote:

I found this code on a website and that will copy a range as a picture. I
also need it too save it as a picture on our network. Can you help?
Worksheets("Sheet1").Range("A3:D12").CopyPicture _
Appearance:=xlScreen, Format:=xlBitmap