Print/save ONLY notes not slides

[Richard C. Swarn]

I want to print out or save to Word ONLY notes for use in rehearsals.
(I can't show the Notes on screen while rehearsing). Now, I save the
B&W prez to Word as "Notes next to Slides", then delete the entire
slide column, leaving the Slide Number and the Notes.

Is there a better way?

[Joe H]

In article <0df6tskkvrjeq1k18...@4ax.com>,

To print only the notes, on the File menu, click Print. In the Print
dialog box, at the bottom is a "Print what" drop-down list. Use this
list to select notes.
--
Joe Heugly
Brainbench ‘MVP’ for MS PowerPoint
http://www.brainbench.com

Sent via Deja.com http://www.deja.com/
Before you buy.

[echos]

Richard, that's the best way I know.
Echo

[Steve Rindsberg]

It'd be possible to write a macro that extracts notes text from each slide
and writes it out to a text file or the like, but considering how simple it
is to delete any unwanted columns once you've done a Send To Word from
PowerPoint, I doubt it'd be worth the trouble.

--
Steve Rindsberg, PowerPoint MVP
PPT FAQ - http://www.rdpslides.com/pptfaq
RnR PPTools - http://www.rdpslides.com/pptools
ZAP! for service bureaus - http://www.rdpslides.com/zap

Richard C. Swarn <dps...@worldnet.att.net> wrote in message
news:0df6tskkvrjeq1k18...@4ax.com...

[Kathy Huntzinger]

This will print the entire notes page, with the slide on it. If this is
what you want, it's quicker than sending to Word. You can edit the notes
master to not show the slide placeholder also.
To get to the text of the notes, you'd want to do the send to word.

Kathy

Joe H wrote:

> In article <0df6tskkvrjeq1k18...@4ax.com>,
> Richard Swarn wrote:

> > I want to print out or save to Word ONLY notes for use in rehearsals.
> > (I can't show the Notes on screen while rehearsing). Now, I save the
> > B&W prez to Word as "Notes next to Slides", then delete the entire
> > slide column, leaving the Slide Number and the Notes.
> >
> > Is there a better way?
> >
>

[Steve Rindsberg]

Something like this might do the deed. See comments interspersed.

Sub SpitNotesText()

Dim oPresentation As Presentation
Dim oSlides As Slides
Dim oSlide As Slide
Dim NotesText As String
Dim FileNum As Integer

Set oPresentation = ActiveWindow.Presentation
Set oSlides = oPresentation.Slides

For Each oSlide In oSlides
' Comment this out if you don't want the Slide Number added to the text
output
NotesText = NotesText & vbCrLf & "Slide " & oSlide.SlideIndex
' This may not work for some presentations; sometimes the shape numbers
get screwed up and
' Rectangle 3 isn't there or doesn't contain the notes text. Normally
it should work, though.
NotesText = NotesText & vbCrLf & oSlide.NotesPage.Shapes("Rectangle
3").TextFrame.TextRange.Text
Next oSlide

FileNum = FreeFile
' Change the path here if you like:
Open "C:\SlideNotes.TXT" For Output As FileNum
Print #FileNum, NotesText
Close FileNum

End Sub

--
Steve Rindsberg, PowerPoint MVP
PPT FAQ - http://www.rdpslides.com/pptfaq
RnR PPTools - http://www.rdpslides.com/pptools
ZAP! for service bureaus - http://www.rdpslides.com/zap

Kathy Huntzinger <ka...@tsc.com> wrote in message
news:39D370D9...@tsc.com...

[Richard C. Swarn]

I feel better now, knowing that I am doing all I can easily do to
print only notes. The macro approach is not worth it. i do find that I
have to temporarily remove pictures from the slides first or the
column approach gets screwed up.

[Richard C. Swarn]

The Print Notes pages does not do what I want. It still prints the
slide. Please check the thread I started to see what I decided on.

On Thu, 28 Sep 2000 11:24:57 -0500, Kathy Huntzinger <ka...@tsc.com>
wrote:

[Steve Rindsberg]

Turns out that it's fairly simple to get a straight text file out of PPT via
macro.
I just posted it here a few messages back, all twelve or so lines of code.
;-)

--
Steve Rindsberg, PowerPoint MVP
PPT FAQ - http://www.rdpslides.com/pptfaq
RnR PPTools - http://www.rdpslides.com/pptools
ZAP! for service bureaus - http://www.rdpslides.com/zap

Richard C. Swarn <dps...@worldnet.att.net> wrote in message
news:cg47tsgig505olifm...@4ax.com...

[echos]

Cool. But here's a thought (and maybe this is what your code does, but I sure
can't read that foreign language! <g>)...go to the notes master and delete the
slide placeholder. Extend the notes placeholder to fit the page.
File/Print/Notes Pages. Only thing is that you'll get one slide worth of notes
per page. It would be more trouble fixing that than sending to Word.

Echo

[Steve Rindsberg]

> Cool. But here's a thought (and maybe this is what your code does, but I
sure
> can't read that foreign language! <g>)...go to the notes master and delete
the
> slide placeholder. Extend the notes placeholder to fit the page.
> File/Print/Notes Pages. Only thing is that you'll get one slide worth of
notes
> per page. It would be more trouble fixing that than sending to Word.

The thing I posted simply cycles through each slide and grabs the notes text
then eventually writes it all out to a text file.

I like your idea too ... I've used notes pages with just a slide, no text
placeholder, for gazillionyears now. Never occurred to me to do it the
other way 'round. Pays to peek outside the box once in a while, Steve. <g>

[Richard C. Swarn]

Worked great! You're the best!

Thanks.

[Steve Rindsberg]

Music to mine ears. Glad it worked for ya.

--
Steve Rindsberg, PowerPoint MVP
PPT FAQ - http://www.rdpslides.com/pptfaq
RnR PPTools - http://www.rdpslides.com/pptools
ZAP! for service bureaus - http://www.rdpslides.com/zap

Richard C. Swarn <dps...@worldnet.att.net> wrote in message

news:ga7its4a4t2gu81qi...@4ax.com...

[Kyle Farmer]

File - Download - plain text (.txt)