Zoom Display for whole workbook

[Angie]

I have number of worksheets in the one workbook all currently sitting at zoom
127% - I want to konw if there is away I can changed the zoom display all on
sheets at once to 75%

 

[Mike H]

Hi,

Alt+F11 to open VB editor.
Double click this workbook and past this in on the right:-

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveWindow.Zoom = 75
End Sub

Mike

 

[Mike H]

Angie, another way

Hold down the Ctrl key and click all the sheet tabs to select them and then
set your zoom.

Mike

 

[Gord Dibben]

Select one sheet then right-click and "select all sheets".

Set the zoom on the active sheet and will be done to all.

DO NOT FORGET to ungroup the sheets when done.


Gord Dibben MS Excel MVP