How do I insert the file name in a Powerpoint text box?

[Bruce]

I wish to insert the file name into a text box within a PowerPoint
presentation. This can be done in Excel and in Word but I can't determine how
to accomplish in PowerPoint. Anybody know how?

[PPTMagician]

Hi,

PowerPoint doesn't have autotext like Word. The closest it comes is being
able to put the date in the footer. Click on View, Header and Footer.

Glenna

Post by Bruce
I wish to insert the file name into a text box within a PowerPoint
presentation. This can be done in Excel and in Word but I can't determine how
to accomplish in PowerPoint. Anybody know how?

[Brian Reilly, MS MVP]

In addition to Glenna's suggestion, you could do this with a simple
VBA routine. I'm surprised Steve and I haven't included one of these
in our PPTools Addins. I created one a while ago.

Brian Reilly, PowerPoint MVP

[Glen Millar]

Brian,

I'm surprised you or Steve haven't included this in one of your PPTools
addins.

Oh. You knew that <vbg>.
--
Regards,

Glen Millar
Microsoft PPT MVP
www.powerpointworkbench.com

Australia

Post by Brian Reilly, MS MVP
In addition to Glenna's suggestion, you could do this with a simple
VBA routine. I'm surprised Steve and I haven't included one of these
in our PPTools Addins. I created one a while ago.
Brian Reilly, PowerPoint MVP

[Steve Rindsberg]

Glenna keeps making me add other stuff instead.

-----------------------------------------
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================

[Glen Millar]

Y'all back offf, Glenna.

Post by Steve Rindsberg
Glenna keeps making me add other stuff instead.

[Brian Reilly, MS MVP]

Glen,
Seemed too simple so here's a freebie for y'all (Glenna made me say
y'all) so it's named after her (g).

Option Explicit

Sub Glenna_Y_all()
'This utility writes the current date and time to the
'HeadersFooters textbox on the computer's clock. Also adds full
path and file name.
'Updated 1-20-2005
'Developer: Brian Reilly

Dim dteDate As Date
Dim strUser As String
Dim strFileName As String

dteDate = Now()
strFileName = ActivePresentation.FullName
With ActivePresentation.Slides.Range.HeadersFooters
With .DateAndTime
.Text = "Last saved " & dteDate & " as " & strFileName
.Visible = msoTrue
End With
End With

End Sub

Brian Reilly, PowerPoint MVP

[Glen Millar]

Thanks Brian. It's Brianised behind a button.
--
Regards,

Glen Millar
Microsoft PPT MVP
www.powerpointworkbench.com
Australia

Please, tell us your:
PowerPoint version,
If you are using vba, or
Anything else relevant!

Post by Brian Reilly, MS MVP
Glen,
Seemed too simple so here's a freebie for y'all (Glenna made me say
y'all) so it's named after her (g).
Option Explicit
Sub Glenna_Y_all()
'This utility writes the current date and time to the
'HeadersFooters textbox on the computer's clock. Also adds full
path and file name.
'Updated 1-20-2005
'Developer: Brian Reilly
Dim dteDate As Date
Dim strUser As String
Dim strFileName As String
dteDate = Now()
strFileName = ActivePresentation.FullName
With ActivePresentation.Slides.Range.HeadersFooters
With .DateAndTime
.Text = "Last saved " & dteDate & " as " & strFileName
.Visible = msoTrue
End With
End With
End Sub
Brian Reilly, PowerPoint MVP