Zoom and fit report to wimdow

[MS]

I want to "maximise", then fit a report into the available window.

ATM I maximise on the OnOpen event, then use send keys ......

%{v}, %{z}
....to zoom and fit to the window.

Is there a better "non send keys" way to do this?

We're talkin' A97

Cheers!

[fredg]

On Tue, 25 Jan 2005 05:40:59 GMT, MS wrote:

I want to "maximise", then fit a report into the available window.

ATM I maximise on the OnOpen event, then use send keys ......

%{v}, %{z}

...to zoom and fit to the window.

Is there a better "non send keys" way to do this?

We're talkin' A97

Cheers!

If you open the report by code, i.e. from a command button on a form:
DoCmd.OpenRepor t "ReportName ", acViewPreview.
DoCmd.RunComman d acCmdFitToWindo w
--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.

[David Schofield]

On Tue, 25 Jan 2005 05:40:59 GMT, "MS" <Em***@Myemail. com> wrote:

I want to "maximise", then fit a report into the available window.

ATM I maximise on the OnOpen event, then use send keys ......

%{v}, %{z}
...to zoom and fit to the window.

Is there a better "non send keys" way to do this?

We're talkin' A97

Cheers!

Hi
See the Access Web, "Custom Zoom in Reports" at
http://www.mvps.org/access/reports/rpt0020.htm

"To fit" is zoom coeff = 0.

If you want a specific standard zoom, say 25%, you can open the report
with

DoCmd.OpenRepor t "xxx", acViewPreview
'you can do your maximize here if you want it
DoCmd.RunComman d acCmdZoom25 ' note you can't run this from inside the
report

but there doesn't seem to be a constant for zoom to fit.

David

[fredg]

On 25 Jan 2005 10:46:03 -0600, David Schofield wrote:

On Tue, 25 Jan 2005 05:40:59 GMT, "MS" <Em***@Myemail. com> wrote:

I want to "maximise", then fit a report into the available window.

ATM I maximise on the OnOpen event, then use send keys ......

%{v}, %{z}
...to zoom and fit to the window.

Is there a better "non send keys" way to do this?

We're talkin' A97

Cheers!

Hi
See the Access Web, "Custom Zoom in Reports" at
http://www.mvps.org/access/reports/rpt0020.htm

"To fit" is zoom coeff = 0.

If you want a specific standard zoom, say 25%, you can open the report
with

DoCmd.OpenRepor t "xxx", acViewPreview
'you can do your maximize here if you want it
DoCmd.RunComman d acCmdZoom25 ' note you can't run this from inside the
report

but there doesn't seem to be a constant for zoom to fit.

David

David...
Regarding > but there doesn't seem to be a constant for zoom to fit.
Docmd.RunComman d acCmdFitToWindo w
--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.

[David Schofield]

Hi
Yes I see it now. I was lazy and assumed it would be with the others.
This is the negative effect of intellisense rather than reading the
documentation!
Thanks David

[MS]

"fredg" <fg******@examp le.invalid> wrote in message
news:1p******** *************** *******@40tude. net...

On Tue, 25 Jan 2005 05:40:59 GMT, MS wrote:

I want to "maximise", then fit a report into the available window.

ATM I maximise on the OnOpen event, then use send keys ......

%{v}, %{z}

...to zoom and fit to the window.

Is there a better "non send keys" way to do this?

We're talkin' A97

Cheers!

If you open the report by code, i.e. from a command button on a form:
DoCmd.OpenRepor t "ReportName ", acViewPreview.
DoCmd.RunComman d acCmdFitToWindo w

Thanks!

I've not seen this in the documentation - and a recent bad experience with
send keys has caused me to smarten up my practices!

Cheers!