VBA – Zoom – Fit Selection

Fit Selection

In a Worksheet you can use View->Zoom->Fit Selection to automatically adjust the Zoom to fit a selected Range.

You can “Fit Selection” in VBA by selecting the Range and setting Zoom equal to True.

Sheet1.Range("A1:F15").Select 'set range zoom

ActiveWindow.Zoom = True