>>>>I am trying to copy all shapes on a first slide and then paste it over a second one. Macro recorder produces macro with ActiveWindow approach. Unless I turn PP visible it does not work in this way for me. Anybody could help?
>>>
>>>Mark,
>>>
>>>As you've seen, PowerPoint's ActiveWindow property doesn't work unless PowerPoint is visible. I haven't found any way to access an active slide when PowerPoint is not visible, so you'll have to manage the slide objects explicitly. You can access slide 1 with:
>>>

oPresentation.Slides[1]

>>>
>>Yes, but how to copy all the shapes? If I do .Slides(1).Copy then the whole slide 1 is pasted with a size much smaller then original one.
>
>If you want to make a copy of all the shapes from one slide to another, your best bet is to use the following:
>

oPres.Slides[1].Shapes.Range.Copy
>oPres.Slides[2].Shapes.Paste

>
>This assumes that both Slides 1 and 2 exist, and that Slide 1 has Shape objects on it.
>
> - della

Yes, it works.
Thanks
Mark