Mega Code Archive

 

Categories / VisualBasic Script / Powerpoint

 

Setting the Text in a Header or Footer

Sub footerText()     ActivePresentation.Slides(5).HeadersFooters.Footer.Text = "Confidential" End Sub