or even:
i = Worksheets.count + 1
sName = "Sheet" & i
Worksheets.Add(after:=Worksheets(Worksheets.Count) ).Name = sName


--
Regards,
Tom Ogilvy

"Rockee052 " wrote in message
...
Just in case you want to add a name to your worksheet

Worksheets.Add
ActiveSheet.Name = ("whatever")


Rockee


---
Message posted from http://www.ExcelForum.com/