Access text on NotesPages

[Dominique Heyler]

Hi,

I'de like to get hold of the text written on the NotesPages of my slides,
but I can't figure how to acess the content. Her is my code:

Sub PrintNotes()
Dim sld As Slide
Dim strTxt As String
For Each sld In ActivePresentation.Slides
strTxt = sld.NotesPage.Text
Debug.Print sld.SlideNumber & " " & strTxt
Next
End Sub

Why doesn't it work?

;-) Dominique

 

[Steve Rindsberg]

This should do it for you, Dominique:

Export the notes text of a presentation
http://www.rdpslides.com/pptfaq/FAQ00481.htm

--

Steve Rindsberg PPT MVP
PPTLive ( http://www.pptlive.com ) Featured Speaker
PPTools: http://www.pptools.com
PPT FAQ: http://www.pptfaq.com