Sheets("KTA Issue").Select
Sheets("KTA Issue").Copy Befo=Sheets(1)
Sheets("KTA Issue (2)").Select
Sheets("KTA Issue (2)").Name = "1st Issue"
Sheets("1st Issue").Select
Sheets("1st Issue").Range("A6:F8").Select


--
Regards,
Tom Ogilvy


"mark kubicki" wrote in message
...
i am creating this code by recording a macro -so obviously, it run...


but when i put it into code , it crashes:
"select method of range class failed" on the last line?


Sheets("KTA Issue").Select
Sheets("KTA Issue").Copy Befo=Sheets(1)
Sheets("KTA Issue (2)").Select
Sheets("KTA Issue (2)").Name = "1st Issue"
Sheets("1st Issue").Select
Range("A6:F8").Select

suggestions?
thanks in advance, -mark