You could do

Application.goto activecell, true
activecell.offset(1,1).select
activewindow.freezepanes = true

Bob Flanagan
Macro Systems
Delaware, U.S. 302-234-9857
http://www.add-ins.com
Productivity add-ins and downloadable books on VB macros for Excel

"Ben" wrote in message
...
Hello,
Is there a way of selecting a cell and ensuring that the selected cell is
always at the top left of the screen?
Thank you