Copying sheets without copying named ranges

[NMACK08]

I have a workBOOK with named ranges in it, and want to copy a workSHEET out
of it into a new workBOOK without taking the range names into the new
workBOOK. The new workSHEET doesn't have any named ranges in it, but when I
copy it to a new workBOOK (also without named ranges), it copies all of the
names from the original workBOOK into the new workBOOK.

 

[JLGWhiz]

I would think that:

ActiveWorkbook.ActiveSheet.Cells.Copy
Workbooks(2).Sheets(1).Range("A1").PasteSpecial Paste:=xlPasteValues

Would work.