Hi Bob,

Indeed the Activesheet.Copy command directly creates a new single-sheet
workbook.

I suspect that you have confused this direct creation with a subsequent
(optional) save.

In any event, the looping deletion of other sheets method which you suggest
seems inappropiately lengthy in operation and overly verbose code.
Certainly, were I dealing with (say) a 100-sheet primary workbook, I know
which approach I would adopt.

Just my opinion of course.

---
Regards,
Norman.


"Bob Phillips" wrote in message
...
But that is still not directly

Bob

"srgggf" <jbkjkbjn wrote in message
...

"Bob Phillips" wrote in message
...
Not directly. You could loop round and delete all the others except,
and
the
SaveAs.

Activesheet.copy would appear a pretty direct means of generating a
new
workbook containing (only) the desired sheet.

---
Regards
Norman