excel zoom based on screen resolution

[HanSam]

Hi all,

Can you help me create a module that will make excel's zoom level based on user's screen resolution? I've tried doing what I found on google but they are basing on cell selection. I wouldn't want to go that way since I have sheets that should have preselected cells when they get active.

I really can't upload the file because of confidentiality but you get my point, right?

Thanks!

 

[Hui]

Do you want to see a certain range fill the screen regardless of screen size
or do you always want to see the characters at say 100%?

 

[HanSam]

Hi hui,

I want to see certain ranges but they shouldn't be selected or highlighted. I've tried doing it earlier and all everything I did had the ranges highlighted

 

[Hui]

I would add an event to the Code Module of each worksheet using the Worksheet_Activate event

eg: using a Range

Private Sub Worksheet_Activate()
  Range("A1:T44").Select
  ActiveWindow.Zoom = True
  Range("A1").Select
End Sub

or using a Named Formula

Private Sub Worksheet_Activate()
  Application.Goto Reference:="Sht2_Start_Zm"
  ActiveWindow.Zoom = True
  Range("A1").Select
End Sub

where Sht2_Start_Zm is defined as a Named Formula like
Sht1_Start_Zm =Sheet2!$A$1:$AB$60