Try something like this:

Private Sub Worksheet_Activate()
Range("a1:h1").Select
ActiveWindow.Zoom = True
If ActiveWindow.Zoom 130 Then
ActiveWindow.Zoom = 130
End If
End Sub

Right-click on the sheet tab, select view code and paste this. Adjust
the range and maximum size (130% in this example to whaterver you choose)

Rich Cooper wrote:
I am creating a report using excel and i want to write/find a module that
makes my report open up on anyones machine using excel 2000 look the same.
I want it to adjust the zoom according to the users screen setting? Is this
possible? I am not sure how to do it. If anyone knows could they help i am
looking for a way for when you open up my excel program it will look the
same on everyones machine no matter what the screen settings are at. Excel
will adjust for them automatically making my report look the way it does on
my machine. Is this possible?