Charlotte Foust
cfoust at infostatsystems.com
Wed Apr 30 10:45:58 CDT 2008
The report has the properties you need to set: top, bottom, left, right, orientation and papersize. What are you trying to do that requires more? Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Edward S Zuris Sent: Wednesday, April 30, 2008 9:32 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Quiet day? 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 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com