Insert an Excel worksheet after a specific sheet

Parameters

Macro Title:
Worksheet Name:
Comment:

'

Sub Insert_Worksheet_After_a_Specific_Worksheet()
'insert a new worksheet after a worksheet named Sheet2

Worksheets.Add After:=Worksheets("Sheet2")

End Sub