maxcast
In Microsoft PowerPoint I want to make a macro for removing master layouts that are not used in a slide. How can I find the layouts that are not being used?
asked on 10th Aug 2011 | 1 Answers | Answer It!
Processing your request, Please wait....
uttam
answered on 7th Oct 2011 | |
You can use this:
Sub CleanupDesigns()
Dim I As Integer
Dim J As Integer
Dim oPres As Presentation
Set oPres = ActivePresentation
On Error Resume Next
With oPres
For I = 1 To .Designs.Count
For J = .Designs(I).SlideMaster.CustomLayouts.Count To 1 Step -1
.Designs(I).SlideMaster.CustomLayouts(J).Delete
Next
Next I
End With
End Sub
Here’s to Good Karma
Log in to reply
More Q & A, Solutions and Videos
will answer your tech questions for FREE
Here's to Good Karma
Here's to Good Karma
Enter your OpenID URL
http://
Proceed
Enter your WordPress.com blog URL
http://.wordpress.com
Proceed