Apply To All

[chief]

i would like to run a macro so that my sheet will open at 97% zoom.
can do it for an individual sheet upon open with activewindow.zoom
97, but i would like to know how this page setup can be applied to ol
excel workbooks. If it is possible it would be best that upon openin
any workbook, the workbook would set up as 97% zoom. The primary focu
is on the old workbooks changing over, is there something that can b
set up in the personal workbook that would do this?

thank

 

[routeram]

Hi,

Use this.

Dim i as integer
for i = 1 to Sheets.count
Sheets(i).Select
ActiveWindow.Zoom = 97
Next i

Regards,
Ra