Here at Southampton Exam Factory we have a lot of resources from an exam board for a now-defunct specification. The resources all have several footers and headers in gaudy textboxes with logos. Nobody cares now which section of the defunct syllabus the resources were created for. The macro below will remove them all with one click.
Sub RemoveHeaderAndFooter() Dim oSec As Section Dim oHead As HeaderFooter Dim oFoot As HeaderFooter For Each oSec In ActiveDocument.Sections For Each oHead In oSec.Headers If oHead.Exists Then oHead.Range.Delete Next oHead For Each oFoot In oSec.Footers If oFoot.Exists Then oFoot.Range.Delete Next oFoot Next oSec End Sub