Remover todos os slides mestre não utilizados em uma apresentação do PowerPoint

15

Minha empresa criou recentemente um novo modelo do PowerPoint. Por si só, sem slides, tem 9MB de tamanho. Isso é completamente inutilizável para envio a dispositivos móveis e irrita os clientes. O principal culpado é imagens de alta resolução nos slides principais. Na maioria das vezes eu não uso os 8 slides com as imagens de alta resolução. Eu tentei compactar as imagens, mas isso só leva o modelo para 5MB vazio, ainda muito grande.

Existe uma maneira de salvar a apresentação e descartar automaticamente os slides mestre gigantes não utilizados. Obviamente, posso entrar e excluir os slides mestre, mas queria saber se há algo que permita que você faça isso automaticamente.

    
por Scott 04.11.2014 / 16:25

2 respostas

15

Você pode fazer isso criando uma macro:

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
    
por 18.05.2015 / 15:24
11

Ver como "slides mestre". Quando você passa o mouse sobre cada slide mestre, pode ver se esse slide mestre é usado. Você pode excluir individualmente cada slide mestre. Olha especialmente para quem tem fotos e tira as que não são usadas.

Se você realçar o primeiro slide e, em seguida, continuar pressionando Excluir repetidamente, somente os modelos de slide que não estiverem em uso serão excluídos. Essa é uma maneira fácil de percorrer rapidamente os modelos manualmente sem se preocupar em remover um que esteja em uso.

    
por 15.12.2014 / 06:39