Please can someone help me...

I am using excel 2000 and have write a macro in VBA to copy a
worksheet and then rename the copied sheet. My problem is that are
loop 23 time I get the error Copy of worksheet clas failed Run time
Error 1004.

I have looked at some example were other people had the same problem
but when I use the code i must be doing something wrong.

My code reads

Sheets("ReconMaster").Select
Sheets("ReconMaster").Copy After:=Sheets(7)
Sheets("ReconMaster (2)").Select
Sheets("ReconMaster (2)").Name = strSheetN

Once the sheet is copied I rename based on an Emplyee number. I have
about 100 sheets to create.

Can someone help me get over this problem.