The macro CopyPicture "works"...?
Do you really have the selected cells ? If you have "My
Test" as value in then cell IV65536, do you find the same
in the image ?

-----Original Message-----
Remi,

This works on my machine, and I can paste the picture
into Word:
Range("A1:IV65536").CopyPicture _
Appearance:=xlScreen, _
Format:=xlPicture

However, this one cannot be handled:
Range("A1:IV65536").CopyPicture _
Appearance:=xlScreen, _
Format:=xlBitmap

My machine has 1 GB RAM, Win XP Pro and Excel 2002


--
Ture Magnusson
Microsoft MVP - Excel
Karlstad, Sweden

"Remi" wrote in message
...
Thank you for the tip "SHIFT key".

"Copy Picture" do the same as my macro:
ActiveSheet.Cells.CopyPicture [xlScreen/xlPrinter],
[xlPicture/xlBitmap]
But now I can see a message :
"this image is too large and will be truncated"
(translated from french with www.google.com)

It seem to be no way for a large selection of cells,
and I
will have to concatenate several little pictures
acceptable from Excel to have the expected one !?

Remi
-----Original Message-----
Remi,

Does this work better...?

1. Select the range
2. Hold down SHIFT key while opening Edit menu
(lookie! there are some new menu items now!)
3. Select Copy Picture... Click OK
4. Switch to Word and paste

--
Ture Magnusson
Microsoft MVP - Excel
Karlstad, Sweden

"Remi" wrote in
message
...
Hi,
When you paste a Range of Cells as an image, the
size of
the image is limited.
(You can try with a wide selection of cells; do copy,
open
a new word Document, do Edit/Paste Special/Image. The
image will be smaller than you expect.)
Does anybody know how can I workaround ?
Thanks!
Remi


.



.