Hi Sure:

Application.Goto Range("A42"),Scroll:=True
Richard