Word VisualBasic Script

Sub headerfooter()
    ActiveDocument.Sections(3).Footers(wdHeaderFooterPrimary).LinkToPrevious = False
End Sub