Selecting first Unlocked Cell
I have the following macro in my workbook:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Application.WindowState < xlMaximized Then Application.WindowState = _
xlMaximized
Range("A1:N1").Select
ActiveWindow.View = xlPageBreakPreview
ActiveWindow.Zoom = True
Range("b8").Select
End Sub
What this does is
1) makes sure the app is maximized, as well as the "width" of the first page
(A1:N1).
2) makes sure that the screen (which has is frozen at row 7) shows the first
row under the frozen headers.
But what I can't seem to get it to do is this: After I get my display right,
I want the first Unlocked cell on the page to be the selection or activated
cell. This is different on each worksheet.
Suggestions?
|