Hi Howard,
Am Sun, 7 Apr 2013 08:47:17 -0700 (PDT) schrieb Howard:
I tried you revised code and it copied several, say about 17, sheets named ("Main Swb12") and various other numbers and ignored the names listed in
For Each rngC In .Range("C9:C" & LRow).
two things:
1. the code should be placed in a standard module
2. I missed one line of code. The important line:
ActiveSheet.Name = rngC
look here for your workbook "TENDER SHEET":
https://skydrive.live.com/#cid=9378A...121822A3%21191
Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2