> Further to my last. If you save your header text as an autotext entry called
> tHeader, the following macro will insert the header when required
>
> Sub AddHeader()
> Dim oSection As Section
> Dim oHeader As HeaderFooter
> Dim oRng As Range
> On Error GoTo ErrorHandler
> If Len(ActiveDocument.Path) = 0 Then
> ActiveDocument.Save
> End If
> For Each oSection In ActiveDocument.Sections
> For Each oHeader In oSection.Headers
> If oHeader.Exists Then
> Set oRng = oHeader.Range
> With oRng
> .Fields.Add oRng, wdFieldAutoText, "tHeader", False
> .Fields.Update
> End With
> End If
> Next oHeader
> Next oSection
> Exit Sub
> ErrorHandler:
> If Err.Number = 4198 Then
> MsgBox "Document must be saved before adding header", _
> vbCritical, "Not Saved"
> End If
> End Sub
>
>
http://www.gmayor.com/installing_macro.htm>
>
> --
> <>>< ><<> ><<> <>>< ><<> <>>< <>><<>
> Graham Mayor - Word MVP
>
> My web site www.gmayor.com
> Word MVP web site
http://word.mvps.org> <>>< ><<> ><<> <>>< ><<> <>>< <>><<>
>
>
>
> Peter K wrote:
> > Thxs for your reply.
> >
> > For 99.99% of all my work I do need the header. It puts path & file
> > name in the top left in small font & today's date in the top right.
> > No problem with envellopes, Word is smart enough to realize that
> > envelopeds don't get headers & footers.
> >
> > It's only when I use that Step by Step Mail Wizard, that even though I
> > specify 'Envelopes' inists on adding the header.
> >
> > After I wrote my original question, I edited normal.dotm & deleted the
> > header & footer from it. (To be put right back in, the moment I was
> > done with this once a year thing.)Now The file name & date no longer
> > appear, but, an about 5/8 in. top margin is still there, putting the
> > return address way too low.
> >
> > I could print the envelopes individually, bypassing the wizard, & all
> > would be fine. But, that defeats the purpose.
> >
> > How can I stop the wizard from imposing that top margin or header?
> >
> > Again, any help would be appreciated.
> >
> >
> > "Doug Robbins - Word MVP" wrote:
> >
> >> You should not put a header and/or footer in the normal.dot template.
> >> Rather, create another template containing those features and use
> >> that template for the documents that you create for which you want
> >> the features.
> >>
> >> --
> >> Hope this helps.
> >>
> >> Please reply to the newsgroup unless you wish to avail yourself of my
> >> services on a paid consulting basis.
> >>
> >> Doug Robbins - Word MVP
> >>
> >> "Peter K" <PeterK[ at ]discusions.microsoft.com> wrote in message
> >> news:4BED64A5-4B82-4A38-AAC4-7784E63D9CE5[ at ]microsoft.com...
> >>> In Word 2007, my normal.dot includes a header. When writing
> >>> letters & ending
> >>> an Envelope to the document, everything works fine. The header &
> >>> footer appear on all text pages, but not on the envelope.
> >>>
> >>> Trying to print envelopes for Xmas cards: Mailing > Start Mail
> >>> Merge > Step
> >>> by Step Mail Merge Wizard, I specify under document Type
> >>> 'Envelopes'. Going
> >>> ahead, all envelopes get a header & a footer, which makes no sense,
> >>> apparently based on my normal.dotx.
> >>>
> >>> How can I delete these headers & footers?
> >>>
> >>> Any advice would be appreciated.
> >>>
> >>> Peter K
>
>
>
>