"Brent" <(E-Mail Removed)> wrote in
news:(E-Mail Removed):
> Hi- I have about 70 photos in a slide show- in the notes I have the
> persons name- I was wondering is there a way to have the name of the
> person (perhaps the first name) show up on the slide (with out cutting
> and pasting it in for each person) as a footer or header?
>
> Thanks
> Brent
>
>
This could be done with a macro. Something like this is a quick and dirty
version that takes whatever text is in the notes section and adds a text
box to the bottom of the slide with that text:
Sub foo()
Dim oSld As Slide
Dim myText As String
For Each oSld In ActivePresentation.Slides
myText = oSld.NotesPage.Shapes(2).TextFrame.TextRange.Text
oSld.Shapes.AddTextbox(msoTextOrientationHorizontal, 0, 500, 500,
50) _
.TextFrame.TextRange.Text = myText
Next oSld
End Sub
--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/