Powerpoint VisualBasic Script

Sub header()
    Presentations(1).NotesMaster.HeadersFooters.Clear
End Sub