The code is embeded in the sheet so if you copy the sheet then you copy the
code. The easiest way around this is to just create a new sheet and then copy
the cells from tester to the new sheet. Something like this...

Sub CopyTester()
Dim wks As Worksheet

Set wks = Worksheets.Add(After:=Sheets("tr"))
Sheets("tester").Cells.Copy Destination:=wks.Range("A1")

End Sub
--
HTH...

Jim Thomlinson


"geebee" wrote:

hi,

i have the following:

Sheets("tester").Copy after:=Sheets("tr")

the "tester" sheet contains code that i would not like to be copied when the
sheet is copied. what can i add to prevent the code from being copied when
the sheet is copied?

thanks in advance,
geebee