Sorry, I did not explain this very well in my previous post.

I¹d prefer that I do not have to name each worksheet in the macro, just be
able to select the cells in the frontmost worksheet, then apply the macro
zoom to fit the window.

Select some cells and then run:

Sub Macro1()
ActiveWindow.Zoom = True
End Sub

If you assign a shortcut key to the macro, it will be super easy to use.
--
Gary''s Student - gsnu2007k


"Won" wrote:

Sorry, I did not explain this very well in my previous post.

I¹d prefer that I do not have to name each worksheet in the macro, just be
able to select the cells in the frontmost worksheet, then apply the macro
zoom to fit the window.

Many thx. Really simple once you know....


On 12/8/08 18:39, in article
, "Gary''s Student"
wrote:

Sub Macro1()
ActiveWindow.Zoom = True
End Sub