Excel: Macro to save all sheets with A1 cell selection & zoom 100%

Dim sheet As Object
For Each sheet In ActiveWorkbook.Sheets
    ActiveWindow.Zoom = 100
Next sheet

If ActiveWorkbook.Path = "" Then
End If

A hard worker who does four tasks.

  1. Set the selected cell of all sheets to A1.
  2. Set the zoom of all sheets to 100%.
  3. Activate the first sheet.
  4. Save the workbook.

It is convenient to use it as an add-in.

If you save the macro as an add-in (.xlam), you can use it in all workbooks. It is easy and recommended to add it to the Quick Access Toolbar. You can find the method by searching for “macro add-in”. maybe.

Quick Access Toolbar