COPY Sheet with VB BUT not Name Ranges

[HotNumbers]

I am copying a sheet within the same workbook that has named ranges. Is it possible to copy a sheet but not the names ranges? If so, How can I do this in VB

 

[GTO]

This seems to work:
<font face=Courier New><SPAN style="color:#00007F">Sub</SPAN> exa()<br><SPAN style="color:#00007F">Dim</SPAN> wks <SPAN style="color:#00007F">As</SPAN> Worksheet<br><SPAN style="color:#00007F">Dim</SPAN> RangeName <SPAN style="color:#00007F">As</SPAN> Name<br>    <br>    Sheet1.Copy Before:=ThisWorkbook.Worksheets(1)<br>    <SPAN style="color:#00007F">Set</SPAN> wks = ThisWorkbook.Worksheets(1)<br>    <br>    <SPAN style="color:#00007F">For</SPAN> <SPAN style="color:#00007F">Each</SPAN> RangeName <SPAN style="color:#00007F">In</SPAN> wks.Names<br>        RangeName.Delete<br>    <SPAN style="color:#00007F">Next</SPAN><br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

 

[HotNumbers]

Excellent...
Thank you so much

 

[GTO]

You are most welcome.