Protip do PowerPointa

Powiedzmy, że pracujecie w dużej firmie, powiedzmy, że macie wielką prezentacje w ppt do wysłania. Na pewno już wykorzystaliście większość standardowych tricków takich jak:

• kompresowanie zdjęć, 
• usuwanie linków do exceli, 
• usuwanie ukrytych slajdów.

Ale prezentacja wciąż waży dziesiątki milionów bajtów. Jest jeszcze jeden trick, który może Wam pomóc. Nieco bardziej zaawansowany, ale jak go opanujecie to zobaczycie, że trwa moment a dużo poprawia:

Usuwanie nieużywanych wzorców z widoku wzorców. 

Można to zrobić ręcznie korzystając z widoku wzorca slajdów:

lecz jest dużo lepsza i wielokrotnie szybsza metoda:

1. Otwieramy w Powerpoincie widok Dewelopera: Alt + F11

2. Dodajemy nowy moduł:

3. wklejamy do niego poniższy kod:

Sub SlideMasterCleanup()

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

4. Odpalamy to makro 

5. Zapisujemy prezentacje pod zmienioną nazwą. (Uwaga: PowerPoint będzie się pytał czy chcemy zapisać prezentacje bez makr. Odpowiadamy tak i nasze makro będzie usunięte.

Gotowe. Prezentacja powinna być wyraźnie mniejsza :D