General ppt VBA questions

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Barb Reinhardt - 23 Oct 2006 17:27 GMT

I'd like to be able to loop through all of the PPT slides in a presentation
and copy/paste data from Excel into those sheets. I have some code that
will copy things from excel at this time and this is definitely a work in
progress. I've done some VBA in excel, but none in PPT. My questions
include:

1) In Excel, I can create a worksheet code name so that I can reference the
appropriate sheet. Is there some way to name the slides in a similar
manner?
2) If I want to loop through the slides one by one, how would I do that?

Thanks. I'm sure I'll be back.

Reply to this Message

Bill Dilworth - 23 Oct 2006 18:02 GMT

From PowerPoint ...
'========Start Code
Sub Iteration()

Dim oSld As Slide

For Each oSld In ActivePresentation.Slides
oSld.Name = "MySlideName" & CStr(oSld.SlideIndex)
'insert your code to bring XL stuff over
Next oSld

End Sub
'========End Code

Please note that PowerPoint's object model is significantly different from
Excel's.

Signature

Bill Dilworth
A proud member of the Microsoft PPT MVP Team
Users helping fellow users.
http://billdilworth.mvps.org
-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
vestprog2@ Please read the PowerPoint FAQ pages.
yahoo. They answer most of our questions.
com www.pptfaq.com
.

> I'd like to be able to loop through all of the PPT slides in a
> presentation
[quoted text clipped - 11 lines]
>
> Thanks. I'm sure I'll be back.

Reply to this Message