Insert an Excel worksheet as the last sheet

Parameters

Macro Title:
Chart Sheet Number:
Comment:

'

Sub Insert_Worksheet_as_Last_Chart_Sheet()
'insert a new worksheet as the last chart sheet

Worksheets.Add After:=Charts(Charts.Count)

End Sub