Zoom All Sheet Tabs

This post will guide you how to zoom all sheet tabs at the same size quickly in excel. How do I zoom all sheet tabs with VBA code in excel. How can I change the zoom size of all sheet tabs in a workbook in excel.

Zoom All Sheet Tabs with Short keys


If you want to zoom all sheets in one certain size, you can use the Ctrl or Shift key to select those sheets firstly, then click zoom button to zoom them. Just see the below screenshot.

zoom all sheets1

Zoom All sheet Tabs with VBA code


If you want to zoom all sheet tabs quickly, you can create an excel VBA Macro code to achieve it. Just do the following steps:

#1 open your excel workbook and then click on “Visual Basic” command under DEVELOPER Tab, or just press “ALT+F11” shortcut.

Get the position of the nth using excel vba1

#2 then the “Visual Basic Editor” window will appear.

#3 click “Insert” ->”Module” to create a new module

convert column number to letter3

#4 paste the below VBA code into the code window. Then clicking “Save” button.

Sub ZoomAllSheets ()
    Dim I As Long
    Dim xActSheet As Worksheet
    Set xActSheet = ActiveSheet
    For I = 1 To ThisWorkbook.Sheets.Count
        Sheets(I).Activate
        ActiveWindow.Zoom = 120
    Next
    xActSheet.Select
End Sub

zoom all sheets2

#5 back to the current worksheet, then run the above excel macro. Click Run button.

zoom all sheets3

#6 Let’s see the result:

zoom all sheets4

Leave a Reply