Thanks for responding Peter.

"Peter T" wrote:

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.