perfect response it worked.


--
Thanks

Paul


"Gary''s Student" wrote:

Make sure the original sheet is named "client". The run this simple macro:

Sub Macro1()
For i = 1 To 50
Sheets("client").Copy Befo=Sheets(1)
ActiveSheet.Name = "client" & i
Next
End Sub
--
Gary''s Student - gsnu200817


"Paul" wrote:

i have a single spreadsheet which will have various cells such a text, data.
I want to create up to 50 copies as tabs client1, client2, client3, etc

any ideas
--
Thanks

Paul