file name in footer

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

how do I create a macro to insert the file name on the last page footer of a
powerpoint presentation? Thx!
 
This is "aircode" but I guess it would it:

Sub footerme()
Dim n As Integer
n = ActivePresentation.Slides.Count
ActivePresentation.Slides(n).HeadersFooters.Footer _
..Text = ActivePresentation.Name
End Sub
 
thank you...it is working except for one thing...how do I get it to
automatically update if filename is changed and be automatically put on last
page of the presentation? Thanks again for all your help!
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

In PowerPoint, how do I insert the file name into the footer? 1
PowerPoint Footers 2
Footers in PowerPoint 1
VBA to insert footer in PowerPoint 1
PowerPoint Separate lines (line break) - PowerPoint Footer 1
Footer text is being removed in 2007 theme for PowerPoint 5
Excel Unique last page footer 1
How do I lock down Footers in Powerpoint Templates? 1

Back
Top