Thread: Zoom Q
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Don Guillett Don Guillett is offline
external usenet poster
 
Posts: 10,124
Default Zoom Q

Put this in the Workbook_open event of the ThisWorkbook module

Sub zoomem()
Sheets.Select
With Sheet1
.Activate
ActiveWindow.Zoom = 75
.Select
End With
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Seanie" wrote in message
...
How would I Zoom all sheets to 75% when particular file is opened?

Thanks