Here is the Visual Basic for Applications code that make this possible. It zoom out the whole workbook to 75%:
Private Sub Workbook_Open() If Application.Sheets.Count > 1 Then Worksheets("Macro").Visible = False End If Application.ScreenUpdating = False For Each ws In Worksheets ws.Activate ActiveWindow.Zoom = 75 Next Application.ScreenUpdating = True End Sub
No comments:
Post a Comment