activewindow.zoom

I am using this code and it but only when I click another tab, then click back on the tab. [Code] Private Sub Worksheet_Activate() ActiveWindow.Zoom = 107 Sheets("Main Menu").ScrollArea = "A1:Q32" End Sub [Code] I tried this as well [Code] Private Sub Worksheet_Open()...

Looking for code assistance, please. How do I select cell A1 & dynamic range for ActiveWindow.Zoom = True My attempt (in blue) doesn't work. iCol = wsSheet1.Cells(1, Columns.Count).End(xlToLeft).Column wsSheet1.Range(A1, iCol).Select ActiveWindow.Zoom = True

Hi everybody, I am using this code for zooming in, is there a way if I use this that it will do it for all my sheets? Sub FIT() Range("A1:R1").Select ActiveWindow.Zoom = True Range("A1").Select End Sub Thanks for the help :) Best regards

Hello friends, Hope all is well. Both below codes work fine, but the second code is not taking effect, I want the formula bar to show up when a new workbook opens. thank you very much in advance! Private Sub Workbook_Open() Application.DisplayFullScreen = False ActiveWindow.DisplayHeadings...

Hi all, When I activate a sheet I want excel to do the following process: I want this because my file has to open on different screens/screen resolutions and everything has to be visible. I hope somebody can help me.