Zoom Not Resizing

P

Phil Hageman

Worksheet "Scorecard" Zoom is manually set at 25%.
Running the below macro does not resize to 61%. Can
someone help correct this code?

Sub GoToScorecard()
Sheets("Scorecard").Select
Range("A1").Select
ActiveWindow.Zoom = 61
End Sub
 
T

Tom Ogilvy

It worked fine for me. Do you have the workbook protected?

Does it raise an error.

Tested in xl2000
 
P

Phil Hageman

Jim, Thanks for your reply. I closed the workbook,
reopened it, and the code works...go figure. Appreciate
your time.
 
Top