Make it visible and then select/activate it:

Sub AddNewSheet()
Worksheets("TEMPLATE").Copy After:=Worksheets(1)
Worksheets(2).Visible = xlSheetVisible
worksheets(2).select '<-- added
End Sub



Porky79 wrote:

Ah I see - Almost there. Copies and creates visable worksheet, but for
some reason then selects the next worksheet as the 'current' or
'active' worksheet. I want the copied sheet to be the active sheet to
prevent any data being incorrectly entered.

Thanks so much for your time

Paul

--

Dave Peterson