View set to 'best fit' for User

  • Thread starter Thread starter Adam
  • Start date Start date
A

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!
 
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
 
Back
Top