moving to new cell and scrolling

[macroapa]

Hi,

I want write some code that does the following:

Starting point would be in cell a1:-

1. move to cell a100
2. scroll window so that a100 is the top left visible cell

Clearly doing point 1 is easy, but how to I get the window to scroll
so that a100 is now at the top as opposed to the bottom?

Cheers.

 

[Otto Moehrbach]

Range("A1").select
With Active Window
.ScrollColumn=1
.ScrollRow=1
End With
HTH Otto

 

[Ron de Bruin]

Use this

Application.Goto Range("A100"), scroll:=True