snb: I didn't use your code because the emplacement on the new sheet name is almost never equal to the number of sheets in the workbook since a lot of operation deal with creating/deleting ws.
After copying a sheet, the new sheet has always the indexnumber equal to the number of sheets in the workbook !