zoom to fit to screen
Is there a way to make these cells always fill the page whichever computer I
am on so that i can always see A1-P45 inclusive?
Perhaps one way would be to place this on the module for your specific worksheet.
Private Sub Worksheet_Activate()
Dim Remember As Range
Set Remember = Selection
[A1:P45].Select
ActiveWindow.Zoom = True
Remember.Select
End Sub
--
HTH :)
Dana DeLouis
"Roger on Excel" wrote in message ...
I have a sheet which is a project summary.
The sheet contains information in cells A1 to P45 inclusive.
Is there a way to make these cells always fill the page whichever computer i
am on so that i can always see A1-P45 inclusive? I find as i use the sheet on
different computers with different screen sizes, it can vary if the screen
shows all the desired contents or not.
Can anyone help?
Thanks,
Roger
|