Can I change zoom default to 75% in Access2003

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

When I preview reports in Access2003 the view defaults to "Fit". Can I change
this
default to 75% zoom for each time I open a form or report?
 
Floyd:

No, there's no default setting to set the zoom. What you have to do when
you open a report in preview is to run code like this:

Docmd.OpenReport "YourReport", acViewPreview
Docmd.SelectObject acReport, "YourReport", False
Docmd.RunCommand acCmdZoom75
 
Floyd said:
When I preview reports in Access2003 the view defaults to "Fit". Can I change
this
default to 75% zoom for each time I open a form or report?


There's no default setting that I've ever seen. The usual
way to get that effect is to add a statement immediately
after the line that opens the report:

DoCmd.OpenReport . . .
DoCmd.RunCommand acCmdZoom75
 
Marshall said:
There's no default setting that I've ever seen. The usual
way to get that effect is to add a statement immediately
after the line that opens the report:

DoCmd.OpenReport . . .
DoCmd.RunCommand acCmdZoom75


Please keep the correspondence in the newsgroup.

In response to your private email:
~Floyd wrote:
~>Your response to my question about the zoom feature
~>was concise and worked well. Thank you.
~>
~>Also, I want to put a calculated total of order quantities
~>in my form page. There is a subform that contains the
~>individual customer orders with quantity entered each
~>time. I created a running total column, but can't figure
~>out how to put it in the header of my main form page.


You're using the word "form", but the situation seems to be
in a report.

Use the subreport's Report footer section to calculate the
total in a text box named txtTotal with an expression like
=Sum(Quantity)

Then, in the main report section that contains the
subreport, add a text box named txtRunTotal with the
expression:
=subreportcontrol.Report.txtTotal
Set this text box's RunningSum property to OverAll.

Now, add a text box named txtGrandTotal to the main report's
report footer section and use the expression:
=txtGrandTotal

Depending on your version of Access, you might(?) be able to
display that toal in the main report's header section by
using a text box with the expression:
=txtGrandTotal
If this header text box displays the wrong total, let me
know and we'll try to go the complicated route to make it
work.
 
Back
Top