Thread: How? Macro to copy range to new worksheet, name new worksheet, loop
View Single Post
  #7   Report Post  
Posted to microsoft.public.excel.programming
E. Kohl E. Kohl is offline
external usenet poster
  
Posts: 4
Default How? Macro to copy range to new worksheet, name new worksheet, loop
Hello Dick,

Sorry if I'm being an idiot, but when I run the macro that you posted,
Excel simply starts an endless loop of creating new worksheets. It gets
to about 850 sheets and then I get the Run time error 1004 "Method 'Add'
of Object 'Sheets' failed." The debugger points me to this line:

'Create new sheet
Set wsh = ThisWorkbook.Worksheets.Add(, _
ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count))

Any ideas? Thanks in advance. Edward




*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!
Reply With QuoteReply With Quote