Add Method (Sheets Collection) Example

This example inserts a new worksheet before the last worksheet in the active workbook.

ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count)