How about this?

Option Explicit
Sub testme()
Dim myRng As Range
Set myRng = Worksheets("sheet2").Range("C3:d99")
Application.Goto myRng, scroll:=True
'or
'Application.Goto myRng.Cells(1), scroll:=True
End Sub


Daveh wrote:

I want to be able to scroll a cell range to the top left hand corner of the
screen under macro control; just as Ctrl + Home does for cell A1.

Any ideas ??

--

Dave Peterson