Perhaps your real desire is to do the equivalent of Ctrl+Home

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'CtrlHome
Dim rng as Range
Application.Goto Range("A1"), True
set rng = ActiveWindow.VisibleRange(1, 1)
rng.Select
End Sub

--
Regards,
Tom Ogilvy


"Jim May" wrote in message
...
Is there a way I can determine the .address of the cell that is the
result of the Control+Home on any sheet that I might activate (and
I have over 100 sheets)?
I'd like to incorporate it into a
Private Sub Workbook_SheetActivate(ByVal Sh As Object) ' macro

Tks in Advance