Cell A1 in Upper Left Corner

[pjhageman]

When Ctl-Home are depressed, the cursor moves to cell A1, and cell A1 i
moved to the very upper left-most corner of the screen. What cod
would be used to place the cursor to cell A55 and move it to the uppe
left-most corner

 

[Rob van Gelder]

Sub testit()
Dim rng As Range

Set rng = Range("A55")
With ActiveWindow
.ScrollRow = rng.Row
.ScrollColumn = rng.Column
End With
End Sub

Rob

 

[J.E. McGimpsey]

One way:

Application.Goto _
Reference:=Range("A55"), _
Scroll:= True

 

[Don Guillett]

try

Application.Goto Worksheets("sheet10").Range("a55). Scroll:=True
for the active sheet just use
Application.Goto Range("a55"), Scroll:=True