zooming and centering a range...

[RobbieC]

Hi there, I have a macro to auto zoom to a range when someone enters a sheet as this is where all the input fields are:

sub enterSheet()
ActiveSheet.Range("T1:CZ1").Select 'set range zoom
ActiveWindow.Zoom = True
end sub

Is there an extra bit of code that I can slide in there to center this range on their 'active' window. It all seems a bit random at the moment and it'd be nice for each page to behave the same upon entry

If you can point me in the right direction, I'd be very happy

Many thanks

Rob

 

[Worf]

Your example code shows a range that uses only the first worksheet row.
You cannot center it vertically with a maximized window. Is this the real case?