This is an easy way to manually roll through the templates quickly without worrying about removing one that is in use. If you highlight the first slide, then keep hitting Delete repeatedly, only the slide templates that are not in use will be deleted. Look especially for those with pictures and remove the ones not used. You can individually delete each slide Layout. ![]() When you mouse over each slide Layout, you can see if that slide Layout is used: In the menu View, click the button "Slide Master": Designs(i). = 0 Thenĭebug.Print "After: # of designs:", ĭebug.Print "After: # of layouts", iLayoutsīelow is basically the same answer as hazelmoon, but with screenshots and additional comments, especially a warning concerning the Master deletion which does not check if its Layouts are still used in the presentation. ![]() Designs(i).SlideMaster.CustomLayouts(j).Deleteĭebug.Print "Before: # of layouts", iLayouts ![]() Sub SlideMasterCleanup()ĭebug.Print "Before: # of designs:", Updated VBA with procedure, plus print some statistics in the Immediate window of the VBA Editor (ALT + F11 or Developer > Visual Basic).
0 Comments
Leave a Reply. |
Details
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |