Zoom...

Home Search Site Map

Up
Comments
Custom Views...
Formula Bar
Full Screen
Header & Footer...
Normal
Page Break Preview
Status Bar
Task Pane
Toolbars
Zoom...

New! Excel User Group Now Open @ www.excelusergroup.org, Check It Out!


Menu command Type What happens next?
Zoom... ...

Displays the zoom setting dialog from which preset levels can be selected, or a custom one entered. One that is handy here is 'Fit selection' which, working with a pre-selected range will zoom the worksheet to ensure the entire selection is shown in view.

Under Tools>Options...>General you can also set a wheel mouse to zoom when the wheel is used.  The default setting is to scroll the worksheet

Sub SetZoomLevel()
Dim vActiveZoom As Variant
'Discovers current zoom and doubles it
vActiveZoom = ActiveWindow.Zoom
ActiveWindow.Zoom = vActiveZoom * 2
End Subub

 

Copyright Nick Hodge 2008. All Rights Reserved.