Keep Consistent cell positions on screen across tabs
Try this in the ThisWorkbook module
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
On Error GoTo done
Application.EnableEvents = False
Application.Goto Range("N34"), True
done:
Application.EnableEvents = True
End Sub
Regards,
Peter T
"Al" wrote in message
...
I'm looking for code which will hold my cell references constant when I
tab
through my worksheets. My workbook contains 34 different worksheets, so
if
my activecell is N34 in the upper left hand corner of my screen, I'd like
the activecell to continue to be N34 in the upper left hand corner of my
screen when I tab through the worksheets.
Thanks in advance.
|