Results 1 to 2 of 2
  1. #1
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Heders & Footers (Word 2000)

    You could run this macro:

    Sub RemoveHeadersFooters()
    Dim hf As HeaderFooter
    Dim sec As Section
    For Each sec In ActiveDocument.Sections
    For Each hf In sec.Headers
    If hf.Exists Then
    hf.Range.Delete
    End If
    Next hf
    For Each hf In sec.Footers
    If hf.Exists Then
    hf.Range.Delete
    End If
    Next hf
    Next sec
    Set hf = Nothing
    Set sec = Nothing
    End Sub

  2. #2
    3 Star Lounger
    Join Date
    Apr 2001
    Location
    London, Gtr London, England
    Posts
    357
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Headers & Footers (Word 2000)

    Is there a quick way to eliminate all headers and footers in my document? Thanks.

    Farmer

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •