Mega Code Archive

 
Categories / VisualBasic Script / Excel
 

Insert two chart sheets after the last worksheet in the active workbook The chart sheets receive default names, such as Chart1 and C

Sub addAfter()     ActiveWorkbook.Sheets.Add After:=Sheets(Sheets.Count), Count:=2, Type:=xlChart End Sub