Je fais un exposé qui ressemble beaucoup au monstre Frankenstein en ce moment. Il y a 4 polices différentes utilisées dans toutes les diapositives, et j'aimerais normaliser ceci. Je veux définir tout le texte à la même police.
Comment puis je faire ça?
J'ai simplement essayé de sélectionner toutes les diapositives, mais vous ne pouvez pas sélectionner le menu Police (et ce n'est que pour mon expérience PowerPoint).
Sélectionnez toutes les diapositives (Ctrl+A) en utilisant la vue Outline
. Vous pouvez ensuite modifier Police pour le texte sélectionné.
En 2010 et 2013 c'est très simple
1) Onglet Accueil> Remplacer (cliquez sur Plus flèche)> Remplacer les polices
Vous devriez éditer Slide Master . Définissez toutes les polices comme celle que vous souhaitez dans toutes les diapositives du masque des diapositives.
Les suggestions ci-dessus vous permettront de changer la police de n'importe quel texte dans le titre/corps/etc. espaces réservés (les éléments "Cliquez ici" qui apparaissent sur les nouvelles diapositives). Cela n'affectera pas les autres textes; pour cela, vous devez utiliser un peu 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