Setting oSL to last slide in presentation

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Barb Reinhardt - 20 Nov 2006 19:23 GMT

I have the following to add a slide to the presentation

Set oSL = aPPS.slides.Add(aPPS.slides.Count + 1, .Shapes(j).Parent.Layout)

but there are times when I want to define oSL as the last slide in the
active presentation. How would I do that?

Thanks

Reply to this Message

David M. Marcovitz - 20 Nov 2006 19:56 GMT

Do you mean:

Set oSL = ActivePresentation.Slides(ActivePresentation.Slides.Count)

--David

Signature

David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/

=?Utf-8?B?QmFyYiBSZWluaGFyZHQ=?=
<BarbReinhardt@discussions.microsoft.com> wrote in
news:58F74B9A-7DB3-4B44-B205-9FA1FD9C988D@microsoft.com:

> I have the following to add a slide to the presentation
>
[quoted text clipped - 5 lines]
>
> Thanks

Reply to this Message