View set to 'best fit' for User

[Adam]

Hi

Excel 2003.

I have a workbook with multiple sheets. Each sheet has multiple tables, two
to a printing page.

What I would like to do is set the document to open so that the view is
exactly a page wide for the User. For example when i set the zoom to 75%, it
looks perfect for me but when colleagues use the document, it appears a lot
more zoomed in.

I have no problems using a macro on opening of the document if needed!

Any help, much appreciated!

 

[Shane Devenshire]

Hi,

The problem here is that Excel doesn't know the screen resolution so its
necessary to call a Window's DLL. John Walkenbach has something on DLL calls
in his PowerProgramming book, and maybe on his website?

You might explore here:

http://www.google.com/search?source...327&q=Calling+windows+dll+from+excel&aq=f&oq=

 

[Don Guillett]

You may or may not like the results but put this is the ThisWorkbook module
to do every sheet

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveSheet.UsedRange.Select
ActiveWindow.Zoom = True
Range("a1").select
End Sub