On second thought ...
here is some code that may help you.
There are 3 steps in this solution for adding notes to your slides pages
from a text file---
Step 1 - format your text file
- at the beginning of each section to be placed into a slide, place a new
line of text beginning with the following three symbols, '~!~' (without the
quotes.)
- optionally, place the target slide number after, but on the same line
- save file as a 'text only' or .TXT file.
Step 2 - create the macro
- open you presentation (or better yet, a copy of your presentation)
- open the VBE window by pressing Alt + F11 or by clicking Tools | Macro |
Visual Basic Editor
- underneath the line that reads Option explicit (if it appears), click to
position the cursor
- Paste all the code between the following lines
-----------------------------------
Public Sub InsertNotesFromTextFile()
Dim FileName As String
Dim Dummy As String
Dim SldNum As Integer
FileName = InputBox("Source File?" & _
"(Full path and name)--", _
"Text Source", "")
Open FileName For Input As #1
Do While Not (EOF(1))
Input #1, Dummy
If Left(Dummy, 3) = "~!~" Then
Dummy = Right(Dummy, _
Len(Dummy) - 3) & " "
If IsNumeric(Dummy) Then
SldNum = Val(Dummy)
Else
SldNum = SldNum + 1
End If
Else
If SldNum > ActivePresentation. _
Slides.Count Then
MsgBox "Text file reference " & _
"to unknown slide " & SldNum & _
". Imported text will be " & _
"placed at the end of current " & _
" notes on the last slide, #" & _
ActivePresentation.Slides.Count, _
vbCritical + vbOKOnly, "ERROR"
SldNum = ActivePresentation.Slides.Count
End If
With ActivePresentation.Slides(SldNum). _
NotesPage.Shapes(2).TextFrame.TextRange
..Text = .Text & vbCr & Dummy
End With
End If
Loop
Close #1
End Sub
-----------------------------------
- close the VBE window
Step 3 - Run the macro
- click Tools | Macro | Macros ... | InsertNotesFromTextFile | Run
- enter the full path and name of the file
I know the code is not pretty, but I compressed it to avoid NewsGroup text
wrap. I should work unless something ugly happens. If you have trouble
with this, either post back to the group with your e-mail (anti-spammed, of
course) or e-mail me directly.
B
===============
Change org to com to defuse anti-spam, ant-virus, anti-nuisance
misdirection.
"B" <(E-Mail Removed)> wrote in message
news:%(E-Mail Removed)...
> You could do this with some VBA code, but writing the code for just a
small
> presentation would take longer than just cutting and pasting from Word to
> PowerPoint.
>
> Just how many slides /notes are we talking about here?
>
> B
> ===============
> Please spend a few minutes checking out www.pptfaq.com This link will
> answer most of our questions, before you think to ask them.
>
> Change org to com to defuse anti-spam, ant-virus, anti-nuisance
> misdirection.
> "Ralph" <(E-Mail Removed)> wrote in message
> news:51023ADD-9CF3-4CC5-8229-(E-Mail Removed)...
> > Hye,
> >
> > I have a presentation in ppt, I would like to add speaker notes (from an
> txt or doc files),
> > any idea how I can import the speaker notes file into the my ppt
> presentation
> >
> > Otherwise, I will have to copy/paste from a slide to another.
> >
> > Cheers,
> >
> > Ralph
> >
>
>