How do I make a report open to "Fit"? 2

[ErikZ]

Well, I asked this question in the "Access: Reports" Forum, but no one answered. So I'll try here:

Right now, my reports are opening up at default, "100%". How do I make it open to "fit"?

It didn't occur to me that this would be a problem, until I watched my boss be COMPLETELY at a loss, trying to see the whole report.

 

[bobbster2000]

When creating your Report, try not to have it be any wider than 6 1/2 across and 8 inches in length.

 

[ErikZ]

When you run a report, it goes to the print preview screen, which opens at 100%. If you go to the control bar on the top, it lets up change the view to different levels of magnification. One of the options in there is not a number (50%, 100%, 200%) but it is called "Fit". If you choose that the report is resized to fit in the window space available.

Changing the size of the output does not change this behavior.

 

[bobbster2000]

I was talking about the width and length in the design view section. Does your data stretch across the 6 1/2 way mark or is it longer than the 8 inch mark?

 

[ErikZ]

The page is between the 6.5 inch mark and the 8 inch mark. I needed more space than the 6.5 inches so I reduced the margins by an inch and increased the page area by an inch.

What does this have to do with the print preview? It all fits on one printed page.

 

[bobbster2000]

Sorry about that. I misunderstood your question. Make sure that in the Properties box of your Report that you have "Auto Resize" set to yes.

 

[jacksonmacd]

AutoResize? Is that a property in Access97 reports? I don't see it anywhere in the Property Sheet. Where can I find it?

 

[bobbster2000]

Access for Office XP has this function. I'm not sure if it was just created or if its been around for Access 2000.

 

[PaulF]

Open the Report in Print Preview, and follow that command with a RunCommand to size it to fit

DoCmd.OpenReport "YourReportName", acViewPreview
DoCmd.RunCommand acCmdFitToWindow

Also see acCmdZoom in Help to Zoom to other sizes such as 75%
.RunCommand acCmdZoom75
PaulF

 

[ErikZ]

Hmm, I had it run "DoCmd.RunCommand acCmdFitToWindow" upon opening. It gave me an error:

"Error 2046, Command or action "FitTowindow" isn't available now."

That's a new one to me.

It doesn't like the "RunCommand acCmdZoom75"

It likes "DoCmd.Maximize" though. Strange.

 

[PaulF]

if you are putting the command in the report's open or load event, it doesn't belong there. It belongs in the same code module where you call the OpenReport command from.

PaulF

 

[jacksonmacd]

PaulF

Cool -- I had never tried putting the DoCmd.RunCommand acCmdFitToWindow in the *calling* code -- always had tried it in the Open event, where it fails. Thx!!

 

[ErikZ]

Hmm. Ok. I run the reports from the switchboard. After going though the code I came across:

' Open a report.
Case conCmdOpenReport
DoCmd.OpenReport rs![Argument], acPreview

Jackpot! So I add the line

DoCmd.RunCommand acCmdFitToWindow

Right after. Same error. "Command or Action 'FitToWindow' not available now."

If this isn't the calling code, then I don't understand what is.

 

[ErikZ]

Oh God, I feel like an Idiot. I left the "On Open" code in the report from last night. I found out when I started opening other reports and they worked perfectly!

Ignore the previous post everyone! The code works perfectly!