.Zoom won't save

[Shake412]

I'm exporting Access 2002 data to Excel for formating. Everything is fine but I need to have the report fit on one screen with no scrolling.

Firstly, I can save all the ActiveWindow settings, but not Zoom. My code is as follows...

With .ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.Zoom = 88
End With

.ActiveWorkbook.Close True

When I reopen, the scrollbars are not visible and everything else worked fine, but the zoom is still 100%?

Secondly I would like loose the cursor and engage the scroll lock so the user can only navigate up and down through the report.

Any ideas?

Any help welcome?

 

[Shake412]

Please disregards the .Zoom problem. I've managed to solve this now.

If anyone knows the answer to the second question though, that would be most helpful.