Can not copy or move some worksheet

[NTNH]

Hi all,

When I copy or move a worksheet. I received the message box:
"A formula or sheet you want to move or copy contains the name'a1', which
already exists on the destination worksheet. Do you want to use this version
of the name?
.. To use the nam as defined in the destination sheet, click Yes.
.. To rename the range referred to in the formular or worksheet, click No,
and enter a new name in the Name Conflict dialog box"
Note: These range names is not defined by me. They may be a macro virus. I
scan my PC, there is not any virus found. I use MS Office 2003. It have
licensing.

* Example: I have a worrksheet name is "a". I use copy or move command to
copy this "a" become worksheet "b". But I can not make a copy of worksheet
"b" by using copy or move command, i received the message box above when i do
this. I can make a copy of worksheet "a" by using copy or move command.

Please tell me what happen.

 

[Barb Reinhardt]

It sounds like you are copying and pasting to a worksheet, rather than
copying the entire worksheet tab.

The error message you are getting is related to the NAMED RANGES in the
workbook. They have nothing to do with the worksheet name.

Go to INSERT NAME and look there. Keep in mind you will only see WORKBOOK
level named and WORKSHEET names that are for the current sheet when you do
this.

I just created a WORKBOOK level named range on Sheet 1 and copied sheet 1.
I ended up with a WORKBOOK level name for the first one I created and a
Worksheet level name for the sheet that was a copy. (Truthfully, I didn't
expect this).


FirstName =Sheet1!$A$1
'Sheet1 (2)'!FirstName ='Sheet1 (2)'!$A$1


Here's a quick and dirty macro to display all of the worksheet names. I'd
probably save my workbook now and work on a copy of it. That way you don't
need to keep the code in your usable workbook. PRESS ALT F11, ensure you
select the VBA project you are working on and INSERT MODULE. Paste the
above code. Also press CTRL G to display the immediate window. Then run
this procedure and you see a list of all of the named ranges.


Sub DisplayNames()
Dim Name As Name
For Each Name In ActiveWorkbook.Names
Debug.Print Name.Name, Name.RefersTo
Next Name
End Sub