[AccessD] Quiet day?

Michael R Mattys mmattys at rochester.rr.com
Wed Apr 30 10:51:32 CDT 2008


There are these, but I'm pretty sure its for forms printing

        Application.SetOption "Left Margin", 0.5
        Application.SetOption "Right Margin", 0.5
        Application.SetOption "Top Margin", 0.5
        Application.SetOption "Bottom Margin", 0.5

Michael R. Mattys
MapPoint & Access Dev
www.mattysconsulting.com

----- Original Message ----- 
From: "Edward S Zuris" <edzedz at comcast.net>
To: "'Access Developers discussion and problem solving'" 
<accessd at databaseadvisors.com>
Sent: Wednesday, April 30, 2008 12:32 PM
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 




More information about the AccessD mailing list