Insert an Excel worksheet after the first sheet

Macro Title:
Sheet Reference:
Comment:

'

Sub Insert_Worksheet_After_the_First_Sheet()
'insert a new worksheet after the first sheet

Worksheets.Add After:=Sheets(1)

End Sub