Macro - Zoom

  • Thread starter Thread starter Alfons
  • Start date Start date
A

Alfons

Hello,

Is there a macro command that will make all sheets in the
WORKBOOK to View > Zoom to 80 or 90, etc.

Thanks in advance.
 
Hi
try the following macro
sub zoom_it()
dim wks as worksheet
dim old_wks as worksheet
set old_wks = activesheet

for each wks in activeworkbook.worksheets
wks.activate
activewindow.zoom = 80
next
old_wks.activate
end sub
 
Back
Top