copy excel named ranges to powerpoint as pict with VBA

[Jeff]

I have search several site for a couple of days and have not come up with the
code.

Does any one have the code?

 

[Jon Peltier]

I wrote a web page about working with PowerPoint and Excel:

http://peltiertech.com/Excel/XL_PPT.html

This example on the page has, I think, what you want:

http://peltiertech.com/Excel/XL_PPT.html#rangeppt

- Jon

 

[Jeff]

Thanks I used your site and others to do what I need to do. but--
I have not been able to paste as a Picture I only get a table.
This is my copy code and past code:

PPApp.Visible = msoTrue
Sheets("seac summary").Range("monthtomonth").Select
Set PPSlide = PPApp.ActiveWindow.View.slide
Selection.Copy

PPSlide.Shapes.PasteSpecial(ppPasteMetafilePicture).Select

all help will be appreciated.

 

[Jon Peltier]

The example I provided copied the range as a picture, so regular pasting
would paste as a picture.

- Jon

 

[amit]

Hi Jon - Thx for your website, i've found it very useful...the code seems to
work when i select less number of cell but if i try n select a slightly
larger area i get this runtime error...

"Excel cannot complete task with available resources, use lessd ata or close
other applications"

is there a way to avoid this ?