Edward S Zuris
edzedz at comcast.net
Wed Apr 30 11:32:00 CDT 2008
Ok. Here is a challenge.
Is there a VBA method under 10,000 lines of code
to set the margins of an Access 2000 report ?
= = = = = = = = = = = = = = = = = = = = = = = = =
This is a script from Word 2000.
= = = = = = = = = = = = = = = = = = = = = = = = =
With ActiveDocument.PageSetup
.LineNumbering.Active = False
.Orientation = wdOrientPortrait
.TopMargin = InchesToPoints(0.7)
.BottomMargin = InchesToPoints(0.6)
.LeftMargin = InchesToPoints(0.5)
.RightMargin = InchesToPoints(0.4)
.Gutter = InchesToPoints(0)
.HeaderDistance = InchesToPoints(0)
.FooterDistance = InchesToPoints(0)
.PageWidth = InchesToPoints(8.5)
.PageHeight = InchesToPoints(11)
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
.SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False
.DifferentFirstPageHeaderFooter = False
.VerticalAlignment = wdAlignVerticalTop
.SuppressEndnotes = False
.MirrorMargins = False
.TwoPagesOnOne = False
.GutterPos = wdGutterPosLeft
End With
= = = = = = = = = = = = = = = = = = = = = = = = =
-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby
Sent: Wednesday, April 30, 2008 8:17 AM
To: Access Developers discussion and problem solving
Subject: [AccessD] Quiet day?
Is there anybody out there....
;-)
--
John W. Colby
www.ColbyConsulting.com
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com