Split and Save individual powerpoint slide with the name in notes VBA - vba

I would like to split my PowerPoint file such that each slide is saved as a separate PowerPoint file. I would like the name of each file to correspond with the text present in the notes section.
This code worked for splitting the PowerPoint file. What I would like to do now is to name and save each slide with text located in note in each slide.
.NotesPage.Shapes.Placeholders(2).TextFrame.TextRange
This code snippet didn't work. I appreciate your guidance.

Related

Powerpoint VBA code for the subject actions

Powerpoint VBA code to import multiple Jpg format pictures from a folder as individual slides and to crop them all in standard size and to correct the brightness of the pictures and to save back the same slides as individual images to another folder.

Loop through PowerPoint deck, insert photos based on hyperlink in slides

I have a powerpoint where each sheet contains the hyperlink to a photo. I would like to insert the image into each slide based on that file path. Is there a VBA program that would accomplish this?
Thank you

Link Dynamic SQL Chart In Powerpoint

I'm working on a project that needs to be displayed via Powerpoint. I have a SQL chart that is refreshed every morning at 9 am and 12 pm with updated results. I need this information to display within a Powerpoint slideshow for our team, but I'm not sure how to do this where I can see the updated results. I tried inserting the excel spreadsheet as an object and linking that way, but that has not worked.
If the chart is in Excel and automatically refreshes, try it like so:
First, make sure that the PPT file and the XL file are in the same folder if possible.
Select the chart in Excel and rightclick/copy.
Switch to PowerPoint.
Use Paste Special and put a check next to Link to paste the chart into PPT.
I would paste it onto a slide that does NOT have a content placeholder; delete it or put some text into it if one's already there, then paste the chart.
PowerPoint should now update the chart each time you open the presentation, assuming the data/chart have changed in XL.

PowerPoint 2007 - Save images to a file?

I was sent some PowerPoint 2007 files with approximately 75 slides in each. On each slide is one photo. I need to extract the photo from each slide to save in a folder on my system. How can it be achieved?
If for some reason you NEED to do the job using VBA, follow the link David's provided.
If it's a one-shot need to extract the images, make a copy of the PPTX file to begin with.
Let's call it COPY.PPTX for purposes of argument.
Rename COPY.PPTX to COPY.ZIP or even COPY.PPTX.ZIP
Now open the zip file, browse to the media folder and there you'll find the images in the file. Drag them out to wherever you want to store them and you're done.
For Each Slide in ActivePresentation.Slides
Slide.Shapes(1).Export FileName:="folderPath\imageName.jpg" _
Filter:=ppShapeFormatJPG
Next Slide

How to copy picture from Word to Powerpoint programmatically?

I am creating a macro that converts a Word 2007 document into a structured PowerPoint 2007 presentation. I am looping over all the paragraphs of the document and copying them over to the new presentation.
I am able to copy and paste the paragraphs to the presentation just fine. But I also need to be able to copy and paste the pictures from the Word document into the PowerPoint (and in the right location between paragraphs).
So far, I am able to detect if a paragraph is a picture by looking at the paragraph's style attribute - it will say "Figure". But, I don't know what to do from there. After looking online, it looks like I should be able to do this:
paragraphFromDocument.Range.Copy
currentSlide.Shapes.Paste
But, this doesn't seem to work. How do I copy a picture from Word to PowerPoint?
Thanks
EDIT
I've also tried:
paragraphFromDocument.Range.CopyAsPicture
currentSlide.Shapes.PasteSpecial(ppPasteMetafilePicture)
and get this error message:
Shapes.PasteSpecial : Invalid Request. Clipboard is empty or contains data which may not be posted here.
But, when I use that CopyAsPicture command, I am able to open up PowerPoint (with the picture still on the clipboard from the macro) and use the Paste Special command to paste the picture to the slide.
paragraphFromDocument.Range.Copy
currentSlide.Shapes.Paste
actually did end up working, but I had to remove all special characters from the range first. That is why it was giving me the error message.