Como definir todo o texto em todos os slides para a mesma fonte?

Question

Eu estou fazendo uma apresentação que se parece muito com o monstro Frankenstein agora. Existem 4 fontes diferentes sendo usadas em todos os slides, e eu gostaria de normalizar isso. Quero definir todo o texto para a mesma fonte.
Como posso fazer isso?

Eu tentei simplesmente selecionar todos os slides, mas você não pode selecionar o menu Font (e isso é o máximo que minha experiência em PowerPoint vai usar).

    

Answer 1

Selecione todos os slides ( Ctrl + A ) usando a exibição Outline . Você pode então alterar a Fonte para o texto selecionado.

    

Answer 2

Em 2010 e 2013 é muito simples

1) Guia Início > Substitua (clique na seta Mais) > Substituir fontes

    

Answer 3

Você deve editar Slide Master . Defina todas as fontes como a que você deseja em todos os slides no slide mestre.

    

Answer 4

As sugestões acima permitirão alterar a fonte de qualquer texto no título / corpo / etc. placeholders (as coisas "Clique aqui" que aparecem em novos slides). Não afetará outro texto; para isso, você precisaria usar um pouco de VBA.

Sub TextFonts()

    Dim oSl As Slide
    Dim oSh As Shape
    Dim sFontName As String

    ' Edit this as needed:
    sFontName = "Times New Roman"

    With ActivePresentation
        For Each oSl In .Slides
            For Each oSh In oSl.Shapes
                With oSh
                    If .HasTextFrame Then
                        If .TextFrame.HasText Then
                            .TextFrame.TextRange.Font.Name = sFontName
                        End If
                    End If
                End With
            Next
        Next
    End With

End Sub