Remove Notes Pages in PowerPoint (VBA)

Introduction

This VBA demo illustrates how to remove notes pages in PowerPoint 2007 and the later version.

Scenarios

Removing notes pages in PowerPoint is a frequently asked question by users in the Answers forums. For example,

Script

Import the Module file (mRemoveNotes.bas) in PowerPoint.

Step1. Press Alt+F11 to open the VBE in PowerPoint.

Step2.Drag this Module file to the Project Explorer (Press Ctrl+R if you cannot see it) or via File >> Import File... (Ctrl+M).

Run the “RemoveNotes” macro.

Step3. Go back to the presentation.

Step4. Press the Run button via Alt+F8.

Open PPT files.

Step5.Select PPT files (Ctrl+A for all files, Ctrl+Click for certain files) with notes pages from a folder, and then click the Open button.
 
 
Visual Basic
Edit|Remove
    ' ****************************************************************** 
    ' Removing Notes Pages using script is irreversible and user should 
    ' take a backup of presentation files before running script. 
    ' ****************************************************************** 
    With myPPT 
        .DocumentInspectors(4).Inspect msoDocInspectorStatusIssueFound, strResult 
        .DocumentInspectors(4).Fix msoDocInspectorStatusIssueFound, strResult 
        .Save 
        .Close 
    End With 
 

Note

1. The progress will be displayed in the title bar of the presentation (e.g. “...2 of 4” in the following picture) while executing.

2. Please make sure that the selected files are not opened before running this VBA code.

Additional Resources

Related forum threads: