adding a variable footer

  • Thread starter Thread starter Brent
  • Start date Start date
B

Brent

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
 
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/
 
You can make a separate Slide Master for each person and apply each to the
appropriate slides.
 
Back
Top