Controlling the level of zoom in reports 1

[barrysprout]

Anyone know whether it is possible to programmatically set the level of zoom when a report opens. The default zoom in and out are either to big or too small. I want to set my own level but don't want to include any additional toolbars.

 

[Remou]

You can run menu items from code, if that suits:
[tt]DoCmd.OpenReport "rptReport1", acViewPreview
DoCmd.RunCommand acCmdZoom200[/tt]

 

[barrysprout]

Only problem with this method is the default constants that Access provides are limited. I can't zoom to 90% for example which is the level I want. Any way round this?

 

[Remou]

This:

http://www.mvps.org/access/reports/rpt0020.htm

is much fancier.