A macro to call up the SpeakerNotes master in PP

In article , Chant007
wrote:
> I need a simple PowerPoint macro that will call up the SpeakerNotes master
> and format the text to bold 16 point.

This should do it:

Sub TryThis()
Dim oSh As Shape
For Each oSh In ActivePresentation.NotesMaster.Shapes
If oSh.PlaceholderFormat.Type = ppPlaceholderBody Then
Exit For ' found it
End If
Next
If Not oSh Is Nothing Then
With oSh.TextFrame.TextRange.Font
.Size = 16
.Bold = True
End With
End If
End Sub


==============================
PPT Frequently Asked Questions
[URL="http://www.pptfaq.com/"]http://www.pptfaq.com/[/URL]

PPTools add-ins for PowerPoint
[URL="http://www.pptools.com/"]http://www.pptools.com/[/URL]

Don't Miss the PPTLive User Conference! Atlanta | Oct 11-14