What i want to do is create a New workBook, when the number of worksheets reaches 100.
I have a button set up to create a new record(sheet) from a Template (Sheet1) in a workbook.
To save over sizing and increasing the chances of a file crash, i want to have the WB, if the create a New Record Buton is clicked and there is already 99 Records(sheets) in the file, The make a Copy of the first 2 sheets(Opening Page & Template) and CREATE a NEW WORKBOOK with these in them.

Currently i have this:

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 25/06/2006 by Corey
'
Set wb = Workbooks.Add
ThisWorkbook.Sheets("Template").Copy Befo=wb.Sheets(1)
For i = wb.Sheets.Count To 2 Step -1
wb.Sheets(i).Delete
Next i
wb.Sheets(1).Name = "Template"

'
End Sub


It will copy 1 Sheet only, But i need to adapt this to copy the first 2 sheets, AND to do so ONLY when the Number of SHEETS totals say 99.



Any idea's, is it possible?

Corey....