Application.ScreenUpdating = False
Sheets("Sheet2").Activate
Sheets("Sheet2").Range("a1").Select
Sheets("Sheet1").Activate
Application.ScreenUpdating = True


If this post helps click Yes
---------------
Jacob Skaria


"sunilpatel" wrote:

Is it possible to change position of activecell on another sheet.

Tried the obvious! - whilst on "Sheet1"

Sub movecell()
Sheets("Sheet2").Range("a1").Select
End Sub