It has been quite some time since I posted in this blog. Murugan had kindled that in the form of the following snippet. We are had earlier tried Creating PowerPoint Presentation through VBA and Save PowerPoint Presentation as PDF using VBA
This snippet converts the TextBoxes / Shapes with Text that are available in PowerPoint Slide to Notes Section.
Sub Export_TextBoxes_AsNotes() Dim oPPT As Presentation Dim oSlide As Slide Dim oSlideShape As Shape Dim oNotesShape As Shape Set oPPT = ActivePresentation Set oSlide = oPPT.Slides(3) For Each oSlideShape In oSlide.Shapes If oSlideShape.HasTextFrame Then Set oNotesShape = oSlide.NotesPage.Shapes.AddShape(msoShapeRectangle, 54, 442, 432, 324) ' oNotesShape.TextFrame.TextRange.Text = oSlideShape.TextFrame.TextRange.Text End If Next If Not oSlide Is Nothing Then Set oSlide = Nothing If Not oPPT Is Nothing Then Set oPPT = Nothing End SubSee also:
Delete End Points from List using Powerpoint VBA
How to Save PowerPoint Presentation as PDF using VBA