Attaching PDFs from PowerPoint and Email

Do you want to send them all in a single email, together?

If so, I'd probably add each name created to a Scripting.Dictionary, and after all were made would then create an outlook mail item and attach each by then referring to the index of name in the dictionary. Is this what you need?

Like this?

Please Login or Register  to view this content.

If you still want to export as a single PDF, this might work for you as well:

Please Login or Register  to view this content.

Oh yeah, there we go. I don't know a thing about PowerPoint but I'm pretty handy with franken-coding.

The hard part is figuring out the names of everything. I worked on my original idea until it finally paid off:

Please Login or Register  to view this content.

This will save each Slide as a single PDF, with the slide number, and save the name of each to a little invisible floaty index while it goes.
Then when it creates a new mail item, it goes back to the "scripting dictionary" thingy and pulls all the file names it stored from before and attaches them.

I just taught myself Scription.Dictionary on Friday, glad to see I already found a use for it.

For c = 0 To objDict.Count-1

Maybe

You have to set the references as indicated by the comments.
You need to go to Tools->References and check the boxes for Microsoft Outlook and Microsoft Scripting Runtime.

And I confirmed my suspicions with regards to solving the runtime error, the 'For c = 0 to ...' needs a -1 at the end.

Please Login or Register  to view this content.