If you can use vba this code will instantly change all titles to upper case!
Sub TitlesToUpper()
Dim oSld As Slide
Dim oShp As Shape
For Each oSld In ActivePresentation.Slides
For Each oShp In oSld.Shapes
If oShp.Type = msoPlaceholder Then
If oShp.HasTextFrame Then
If oShp.TextFrame.HasText Then
If oShp.PlaceholderFormat.Type = ppPlaceholderCenterTitle Or _
oShp.PlaceholderFormat.Type = ppPlaceholderTitle Then
oShp.TextFrame.TextRange.Text = UCase(oShp.TextFrame.TextRange.Text)
End If
End If
End If
End If
Next oShp
Next oSld
Oh, and I meant to mention -- we can actually do this in PPT 2007.
In 2007, you go to the slide master, select the placeholder, and launch the
Font formatting dialog box. There you can check a box beside "all caps," and
that will make the text in those placeholders on the slides all caps. (We
can't do this in current versions because there's no "all caps" option in
Format | Font.) In fact, there's also an option for small caps, which I'm
very happy about.
I'll have to add this to my "What's new in PPT 2007?" list.
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.
