Header/Left margin
you might try adding a few leading spaces to the text in
the left header to shift the text over to where you want
it. yes cheap i know but it works.
-----Original Message-----
Hi,
I run Excel 2k, SR1.
I'm formatting a report using PagesSetup.
I've reduced the reportsections left margin to 0.61...
The problem is that
the header margin doesn't seem to use the body sections
left margin, making
the text in the left header print a few points to the
right of the rest of
the report.
Is there any way, using VBA, to also ajust the headers
left margin?
TIA
Peter
[part of the code]
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$" & Range(strStartcell).Row
.LeftHeader = "&""Arial,Bold""&14Report Header"
.RightHeader = "&8&D"
.RightFooter = "&8&P(&N)"
.LeftMargin = Application.InchesToPoints
(0.611811023622047)
.RightMargin = Application.InchesToPoints
(0.611811023622047)
.TopMargin = Application.InchesToPoints
(0.984251968503937)
.BottomMargin = Application.InchesToPoints
(0.784251968503937)
.HeaderMargin = Application.InchesToPoints
(0.511811023622047)
.FooterMargin = Application.InchesToPoints
(0.411811023622047)
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = False
End With
.
|