View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
PO PO is offline
external usenet poster
 
Posts: 66
Default Header/Left margin

Hi

I have the oposite problem - since my left margin is SMALLER then normal the
body text is to the LEFT of the report header.

Is there any solution to the problem?

Regards
Peter

"Frank Stone" wrote in message
...
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



.