Leaving the cursor at a known position on a worksheet
 

How do I correct the following code to not give a 1004 error:
NewStatusSheetName = "newsheetname"
....
Sheets(NewStatusSheetName).Range("$A$1").Select
....
My macro jumps between two sheets and I want to leave the cursor at the top
of the new sheet at the end. I found that the following works, but I don't
know if a Go To is the best solution:
Application.Goto Sheets(NewStatusSheetName).Range("$H$1")

I appreciate your help, -John

Leaving the cursor at a known position on a worksheet
 

Hi

Set NewStatusSheet = Worksheets("NewSheetName")
NewStatusSheet.Range("$A$2").Select

or

NewStatusSheetName = "NewStatusSheet"
Worksheets(NewSheetName).Activate
Range("$A$2").Select

Hopes this helps.

---
Per

"John" skrev i meddelelsen
...
How do I correct the following code to not give a 1004 error:
NewStatusSheetName = "newsheetname"
....
Sheets(NewStatusSheetName).Range("$A$1").Select
....
My macro jumps between two sheets and I want to leave the cursor at the
top
of the new sheet at the end. I found that the following works, but I
don't
know if a Go To is the best solution:
Application.Goto Sheets(NewStatusSheetName).Range("$H$1")

I appreciate your help, -John