Is it possible to take a snapshot of an excel page and save it as a jpg, or
to convert an excel page to a jpg file in another way?

PeggyN wrote:
Is it possible to take a snapshot of an excel page and save it as a jpg, or
to convert an excel page to a jpg file in another way?

Screenshot?

houghi
--
________________________ Open your eyes, open your mind
| proud like a god don't pretend to be blind
| trapped in yourself, break out instead
http://openSUSE.org | beat the machine that works in your head

1. You probably want GIF or PNG instead of JPG, because JPG is developed for
photographic art with gradual color changes, but is highly unsuitable for
screen shots with sharp transitions between distinct color regions and for
text.

2. You can use the Prt Scrn key, which copies the screen as a bitmap to the
clipboard, then paste it into a graphics program (Alt + Prt Scrn copies the
active window).

3. You could use a screen capture program. There are numerous free ones
available, and for a very reasonable price, SnagIt is highly functional.

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______


"PeggyN" wrote in message
...
Is it possible to take a snapshot of an excel page and save it as a jpg,
or
to convert an excel page to a jpg file in another way?

Look:
http://www.mvps.org/dmcritchie/excel/xl2gif.htm

--

Rodrigo Ferreira


"PeggyN" escreveu na mensagem
...
Is it possible to take a snapshot of an excel page and save it as a jpg,
or
to convert an excel page to a jpg file in another way?

You can not save part of a Excel sheet directly as a .jpg file. In order to
do that you must copy and paste the desired area into an image editor program
like Paint Shop Pro, and then save the file as a .jpg from there.

Vaya con Dios,
Chuck, CABGx3



"PeggyN" wrote:

Is it possible to take a snapshot of an excel page and save it as a jpg, or
to convert an excel page to a jpg file in another way?

From a post by Bob Phillips

Sub RangeToGIF()
CreateImageFile _
TheExportRange:=Range("B2:e7"), _
TheFileName:="c:\a\myPic", _
TheFileFormat:="gif"


End Sub


Sub CreateImageFile(TheExportRange As Range, _
TheFileName As String, _
TheFileFormat As String)


TheExportRange.CopyPicture Appearance:=xlScreen, _
Format:=xlPicture


Dim chtobj As ChartObject
Set chtobj = TheExportRange.Parent.ChartObjects.Add(1, 1, 1, 1)


With chtobj
.Width = TheExportRange.Width + 8
.Height = TheExportRange.Height + 8
.Chart.ChartArea.Border.LineStyle = 0
.Chart.Paste
.Chart.Export Filename:=TheFileName & "." & TheFileFormat, _
FilterName:=TheFileFormat
.Delete
End With


Set chtobj = Nothing


End Sub





--
Don Guillett
SalesAid Software

"PeggyN" wrote in message
...
Is it possible to take a snapshot of an excel page and save it as a jpg,
or
to convert an excel page to a jpg file in another way?

Now THAT is 'WAY BEYOND COOL!!!...........thanks for sharing that Don, and
thanks to Bob for the creativity........I'll get a lot of mileage out of that
one......

Vaya con Dios,
Chuck, CABGx3



"Don Guillett" wrote:

From a post by Bob Phillips

Sub RangeToGIF()
CreateImageFile _
TheExportRange:=Range("B2:e7"), _
TheFileName:="c:\a\myPic", _
TheFileFormat:="gif"


End Sub


Sub CreateImageFile(TheExportRange As Range, _
TheFileName As String, _
TheFileFormat As String)


TheExportRange.CopyPicture Appearance:=xlScreen, _
Format:=xlPicture


Dim chtobj As ChartObject
Set chtobj = TheExportRange.Parent.ChartObjects.Add(1, 1, 1, 1)


With chtobj
.Width = TheExportRange.Width + 8
.Height = TheExportRange.Height + 8
.Chart.ChartArea.Border.LineStyle = 0
.Chart.Paste
.Chart.Export Filename:=TheFileName & "." & TheFileFormat, _
FilterName:=TheFileFormat
.Delete
End With


Set chtobj = Nothing


End Sub





--
Don Guillett
SalesAid Software

"PeggyN" wrote in message
...
Is it possible to take a snapshot of an excel page and save it as a jpg,
or
to convert an excel page to a jpg file in another way?