Sending Notes only to Word in PPT 2000?

[Jeff]

Is there any way to send the notes only (without a picture of the slide) to
MS Word in Office 2000. I have a large presentation and would like to be
able to have a document with only the notes on it, but when I "send to"
Word, its also send a picture of the slide and the .doc becomes too large of
a file (100mb).

Thanks,

Jeff

[Echo S]

Jeff, someone posted code for getting notes out of PPT and into Word (I
think). You might check through some of the recent group postings until
someone can pop in and verify!

Or, if you send to Word and then select the column with the slides, you can
delete the entire column. (I'd delete the "slide number" column, too.) You
could then select the table and use "convert table to text" if you want only
notes text in a regular Word format as opposed to inside table cells. Make
sure Allow Fast Saves is turned off in Word, and you should end up with a
normal-sized document.

Echo

"Jeff" <jb...@aromatec.com> wrote in message
news:9b71um$3h3$1...@earth.superlink.net...

[Sonia]

First, my caveat is that I don't normally have need to send to Word, so this
may be a very "imperfect" solution for you. Hopefully others will jump in
and offer something more elegant.

However, I just tried this: I went to View > Notes and then to File > Send
To > Word and selected "notes next to images" and clicked okay. Word
opened and loaded my images and notes in three columns (first column has
slide number). Then I selected the column that contained the images and
deleted it via Table > Delete > Column. Then I was able to use Table >
Properties > Column/Row to adjust the width of the column and the height of
the row(s) to make best use of the page and reduce "white space". Like I
say, this isn't very elegant, but it works, and was pretty fast. <G>

Sonia Coleman, MS Power Point MVP Team
http://www.soniacoleman.com
Autorun CD Project Creator
http://www.soniacoleman.com/Tutorials/PowerPoint/Autorun_CD.htm

"Jeff" <jb...@aromatec.com> wrote in message
news:9b71um$3h3$1...@earth.superlink.net...

[Sam Barrett]

Well, I thought that I posted some code like that, but I sure can't find it.
Here's a new solution. If there is a Word wizard reading this, please post a
correction to this code to replace the ---- with a border between the slides. I
can't figure it out yet. Hope this helps, Jeff. --Sam

In your PP presentation, select the Tools, Macro, Record New Macro... menu item.
Enter the macro name as sendNotesToWord and press OK.
Press the Stop Recording button.
Select the Tools, Macro, Macros... menu item.
Click sendNotesToWord to select it and press the Edit button.
This will start VBA and place you in the sendNotesToWord macro code.
In VBA, select Tools, References... menu item.
Click the Microsoft Word checkbox to include the Word object library and press OK.
Replace the empty sendNotesToWord macro with the following code, return to PP,
save your presentation, and run the macro.

Option Explicit
Sub sendNotesToWord()
Dim wrdApp As Word.Application
Dim doc As Word.Document
Dim intSaveView As Integer
Dim i As Integer
Set wrdApp = New Word.Application
Set doc = wrdApp.Documents.Add
wrdApp.Visible = True
intSaveView = ActiveWindow.ViewType
For i = 1 To ActiveWindow.Presentation.Slides.Count
ActiveWindow.View.GotoSlide i
ActiveWindow.ViewType = ppViewSlide
doc.Range.InsertAfter "Slide " & i & ": "
doc.Range.InsertAfter _
ActiveWindow.Selection.SlideRange.Shapes(1).TextFrame.TextRange.Text
& vbCr & vbCr
ActiveWindow.ViewType = ppViewNotesPage
doc.Range.InsertAfter _
ActiveWindow.Selection.SlideRange.Shapes(2).TextFrame.TextRange.Text
doc.Range.InsertAfter vbCr & vbCr & "-----" & vbCr & vbCr
Next i
ActiveWindow.ViewType = intSaveView
End Sub

Sam Barrett, MTL Systems, Inc., mailto:s...@mtl.com
Brainbench MVP, http://www.brainbench.com

And the things that you have heard...commit these to faithful
men who will be able to teach others also. 2 Timothy 2:2

Echo

.

[Echo S]

That's exactly what I was suggesting, Sonia, but you gave much more explicit
instructions. Thanks.

Echo

"Sonia" <so...@nowhere.com> wrote in message
news:u#f0akCxAHA.1748@tkmsftngp03...

[Sonia]

I guess I was so busy testing the approach that I didn't see your response
before I posted mine. If I had I would have done a quick cancel of my
reply. You have much more experience at this than I, so I was going out on
a limb. I'm glad I wasn't sawing off the limb as I went. <G> Guess I'd
better play with this more, 'cause I can see some other possibilities that
are enticing.

"Echo S" <ec...@indy.net> wrote in message
news:ek0YCcExAHA.1844@tkmsftngp05...