Displaying a Set Column Range

Let's say that you want to display a specific number of columns on a worksheet in the available window space. You can manually figure out the necessary width of each column and do the adjustments, or you can write a macro that will figure out, proportionally, how the width of each column should be adjusted to get the desired results.

An easier method, however, is to just adjust the zoom factor for a desired number of columns. This can be done manually by selecting the columns and then choosing View | Zoom | Fit Selection. If you want to do it programmatically, it is even easier. Right-click a worksheet tab (the one you want this macro to apply to) and then choose View Code from the resulting Context menu. Excel displays the Visual Basic Editor, and you should enter the following into the code window:

Private Sub Worksheet_Activate()
    Range("A1:L1").Select
    ActiveWindow.Zoom = True
    Range("A1").Select
End Sub

This particular macro assumes that you want to view columns A through L in the window. It selects the range A1:L1, and then sets the zooming factor to display just that selection (the columns you want). Finally, it selects cell A1 and ends.