How do I change the font globally in an existing presentation?

[jmgfete]

I have to edit an existing presentation. I want to make all the text font 14
point (currently it is 24 and 40). How do I change the font size all at once?
The existing master is simply a background image. There is no sample text on
the master to change. Am on deadline so would appreciate knowing as quickly
as possible. Thanks.

 

[Echo S]

I have to edit an existing presentation. I want to make all the text font 14
point (currently it is 24 and 40). How do I change the font size all at once?
The existing master is simply a background image. There is no sample text on
the master to change. Am on deadline so would appreciate knowing as quickly
as possible. Thanks.

If you didn't put your text in placeholders (where it says "click to add
text" on each slide), then you'll have to use VBA to resize the text.

 

[David M. Marcovitz]

Something like this should do it for you:

Sub ChangeFontTo14()
Dim sld As Slide
Dim shp As Shape

For Each sld In ActivePresentation.Slides
For Each shp In sld.Shapes
If shp.HasTextFrame Then
shp.TextFrame.TextRange.Font.Size = 14
End If
Next shp
Next sld
End Sub

--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.loyola.edu/education/PowerfulPowerPoint/

 

[jmgfete]

What is VBA?

If you didn't put your text in placeholders (where it says "click to add
text" on each slide), then you'll have to use VBA to resize the text.

 

[Echo S]

David posted VBA code you can use to change your font size. See How do I use
VBA code in PowerPoint?
http://www.rdpslides.com/pptfaq/FAQ00033.htm for info on how to get started
using it.

However, if you've never worked with code or macros at all, it may be faster
at this point to just change the stuff manually.