Re: Automatic Screen Fit

Tech-Archive recommends: Speed Up your PC by fixing your registry


Is there a way I can also de-select those cells, and
instead select my first input cell (say, "C2")?

Hi Rick,

Silly me, I didn't notice that!

Private Sub Worksheet_Activate()
Me.Range("A1:H4").Select
Application.ActiveWindow.Zoom = True
Me.Range("C2").Select
End Sub


will fix that up.

Ken Johnson

.

Quantcast