I have more than twenty sheets in an Excel workbook (file). Is there some code snippet or a command I could apply/use so that all sheets could be reset to let's say 85% zoom level?
Select the View tab. Select Zoom in the Zoom group. Choose the percentage to which you want to zoom. Alternatively, select Page Width, Text Width, or Whole Page.
To do this, go to Page Layout > Page Setup > Orientation, and click Landscape. Consider using a larger paper size to accommodate many columns. To switch the default paper size, go to Page Layout > Page Setup > Size, and then choose the size you want.
Click the View tab, and in the Zoom group, click Zoom 100%. Click the View tab, and in the Zoom group, click Zoom to Selection, which maximizes the view of cells that you've selected. Click the View tab, and in the Zoom group, click Zoom, and then enter a percentage or choose any other settings that you want.
Sub SetZoom() Dim ws As Worksheet For Each ws In Worksheets ws.Select ActiveWindow.Zoom = 85 ' change as per your requirements Next ws End Sub
BTW, if you simply select all worksheets in your workbook using the tabs you can then set the zoom to 85% and it will apply to all worksheets
If you love us? You can donate to us via Paypal or buy me a coffee so we can maintain and grow! Thank you!
Donate Us With