Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
ben ben is offline
external usenet poster
 
Posts: 232
Default Copying Sheets

I have a workbook with a sub to copy a specific Worksheet and paste a copy to
the end of the workbook. The workbook contains defined names. The worksheet
to copy DOES NOT. When I copy this worksheet, I keep getting the error
message that the worksheet you are trying to copy contains a Range or Formula
with the name (three different names I keep getting ("shoes","vc","bags"), I
did a search in my defined names list they do not exist, I did i search in my
formulas and the search text was not found, I even went into my macros and
checked the sheet modules that were being copied, but the text was not even
found there. Anybody know why this might be happening. NOTE: This only
started happening when i made the sheet modules Option Explicit
ben
--
When you lose your mind, you free your life.
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default Copying Sheets

try running this code

sub ShowNames()
On error goto 0
msgbox "Shoes: " & Activeworkbook.Names("shoes").RefersTo
msgbox "vc: " & activeworkbook.Names("vc").Refersto
msgbox "bags: " & activeworkbook.Names("bags").Refersto
On Error goto 0
End Sub

--
Regards,
Tom Ogilvy

"ben" (remove this if mailing direct) wrote in message
...
I have a workbook with a sub to copy a specific Worksheet and paste a copy

to
the end of the workbook. The workbook contains defined names. The

worksheet
to copy DOES NOT. When I copy this worksheet, I keep getting the error
message that the worksheet you are trying to copy contains a Range or

Formula
with the name (three different names I keep getting ("shoes","vc","bags"),

I
did a search in my defined names list they do not exist, I did i search in

my
formulas and the search text was not found, I even went into my macros and
checked the sheet modules that were being copied, but the text was not

even
found there. Anybody know why this might be happening. NOTE: This only
started happening when i made the sheet modules Option Explicit
ben
--
When you lose your mind, you free your life.



  #3   Report Post  
Posted to microsoft.public.excel.programming
ben ben is offline
external usenet poster
 
Posts: 232
Default Copying Sheets

Tom,
Ran the code the results as follows:
Shoes - Sheet1$a$1:R0C0
VC - Sheet1$ew$757:R0C0
bags - Sheet1$a$1:R0C0

my interpritation of that is that they really don't exist, but of course i
could be easily wrong on that???

"Tom Ogilvy" wrote:

try running this code

sub ShowNames()
On error goto 0
msgbox "Shoes: " & Activeworkbook.Names("shoes").RefersTo
msgbox "vc: " & activeworkbook.Names("vc").Refersto
msgbox "bags: " & activeworkbook.Names("bags").Refersto
On Error goto 0
End Sub

--
Regards,
Tom Ogilvy

"ben" (remove this if mailing direct) wrote in message
...
I have a workbook with a sub to copy a specific Worksheet and paste a copy

to
the end of the workbook. The workbook contains defined names. The

worksheet
to copy DOES NOT. When I copy this worksheet, I keep getting the error
message that the worksheet you are trying to copy contains a Range or

Formula
with the name (three different names I keep getting ("shoes","vc","bags"),

I
did a search in my defined names list they do not exist, I did i search in

my
formulas and the search text was not found, I even went into my macros and
checked the sheet modules that were being copied, but the text was not

even
found there. Anybody know why this might be happening. NOTE: This only
started happening when i made the sheet modules Option Explicit
ben
--
When you lose your mind, you free your life.




  #4   Report Post  
Posted to microsoft.public.excel.programming
ben ben is offline
external usenet poster
 
Posts: 232
Default Copying Sheets

of course I was wrong I just forced delete of the names through code (since I
don't need them) and everything is peachy now. Thanks Tom
ben

"ben" wrote:

Tom,
Ran the code the results as follows:
Shoes - Sheet1$a$1:R0C0
VC - Sheet1$ew$757:R0C0
bags - Sheet1$a$1:R0C0

my interpritation of that is that they really don't exist, but of course i
could be easily wrong on that???

"Tom Ogilvy" wrote:

try running this code

sub ShowNames()
On error goto 0
msgbox "Shoes: " & Activeworkbook.Names("shoes").RefersTo
msgbox "vc: " & activeworkbook.Names("vc").Refersto
msgbox "bags: " & activeworkbook.Names("bags").Refersto
On Error goto 0
End Sub

--
Regards,
Tom Ogilvy

"ben" (remove this if mailing direct) wrote in message
...
I have a workbook with a sub to copy a specific Worksheet and paste a copy

to
the end of the workbook. The workbook contains defined names. The

worksheet
to copy DOES NOT. When I copy this worksheet, I keep getting the error
message that the worksheet you are trying to copy contains a Range or

Formula
with the name (three different names I keep getting ("shoes","vc","bags"),

I
did a search in my defined names list they do not exist, I did i search in

my
formulas and the search text was not found, I even went into my macros and
checked the sheet modules that were being copied, but the text was not

even
found there. Anybody know why this might be happening. NOTE: This only
started happening when i made the sheet modules Option Explicit
ben
--
When you lose your mind, you free your life.




  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default Copying Sheets

The definitely exists

Run this

sub MakeNamesVisible()
On error goto 0
Activeworkbook.Names("shoes").Visible = True
Activeworkbook.Names("vc").Visible = True
Activeworkbook.Names("bags").Visible = True
On Error goto 0
End Sub

Then you should be able to see them in Insert=Names=Define

sub MakeNamesGone()
On error goto 0
Activeworkbook.Names("shoes").Delete
Activeworkbook.Names("vc").Delete
Activeworkbook.Names("bags").Delete
On Error goto 0
End Sub

May work to get rid of them if that is what you want. Sometimes names can
be resistant to being deleted.

--
Regards,
Tom Ogilvy



"ben" (remove this if mailing direct) wrote in message
...
Tom,
Ran the code the results as follows:
Shoes - Sheet1$a$1:R0C0
VC - Sheet1$ew$757:R0C0
bags - Sheet1$a$1:R0C0

my interpritation of that is that they really don't exist, but of course i
could be easily wrong on that???

"Tom Ogilvy" wrote:

try running this code

sub ShowNames()
On error goto 0
msgbox "Shoes: " & Activeworkbook.Names("shoes").RefersTo
msgbox "vc: " & activeworkbook.Names("vc").Refersto
msgbox "bags: " & activeworkbook.Names("bags").Refersto
On Error goto 0
End Sub

--
Regards,
Tom Ogilvy

"ben" (remove this if mailing direct) wrote in

message
...
I have a workbook with a sub to copy a specific Worksheet and paste a

copy
to
the end of the workbook. The workbook contains defined names. The

worksheet
to copy DOES NOT. When I copy this worksheet, I keep getting the error
message that the worksheet you are trying to copy contains a Range or

Formula
with the name (three different names I keep getting

("shoes","vc","bags"),
I
did a search in my defined names list they do not exist, I did i

search in
my
formulas and the search text was not found, I even went into my macros

and
checked the sheet modules that were being copied, but the text was not

even
found there. Anybody know why this might be happening. NOTE: This only
started happening when i made the sheet modules Option Explicit
ben
--
When you lose your mind, you free your life.








  #6   Report Post  
Posted to microsoft.public.excel.programming
ben ben is offline
external usenet poster
 
Posts: 232
Default Copying Sheets

that's interesting I was not aware names could be invisible.

"Tom Ogilvy" wrote:

The definitely exists

Run this

sub MakeNamesVisible()
On error goto 0
Activeworkbook.Names("shoes").Visible = True
Activeworkbook.Names("vc").Visible = True
Activeworkbook.Names("bags").Visible = True
On Error goto 0
End Sub

Then you should be able to see them in Insert=Names=Define

sub MakeNamesGone()
On error goto 0
Activeworkbook.Names("shoes").Delete
Activeworkbook.Names("vc").Delete
Activeworkbook.Names("bags").Delete
On Error goto 0
End Sub

May work to get rid of them if that is what you want. Sometimes names can
be resistant to being deleted.

--
Regards,
Tom Ogilvy



"ben" (remove this if mailing direct) wrote in message
...
Tom,
Ran the code the results as follows:
Shoes - Sheet1$a$1:R0C0
VC - Sheet1$ew$757:R0C0
bags - Sheet1$a$1:R0C0

my interpritation of that is that they really don't exist, but of course i
could be easily wrong on that???

"Tom Ogilvy" wrote:

try running this code

sub ShowNames()
On error goto 0
msgbox "Shoes: " & Activeworkbook.Names("shoes").RefersTo
msgbox "vc: " & activeworkbook.Names("vc").Refersto
msgbox "bags: " & activeworkbook.Names("bags").Refersto
On Error goto 0
End Sub

--
Regards,
Tom Ogilvy

"ben" (remove this if mailing direct) wrote in

message
...
I have a workbook with a sub to copy a specific Worksheet and paste a

copy
to
the end of the workbook. The workbook contains defined names. The
worksheet
to copy DOES NOT. When I copy this worksheet, I keep getting the error
message that the worksheet you are trying to copy contains a Range or
Formula
with the name (three different names I keep getting

("shoes","vc","bags"),
I
did a search in my defined names list they do not exist, I did i

search in
my
formulas and the search text was not found, I even went into my macros

and
checked the sheet modules that were being copied, but the text was not
even
found there. Anybody know why this might be happening. NOTE: This only
started happening when i made the sheet modules Option Explicit
ben
--
When you lose your mind, you free your life.






Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Copying Sheets Stacy C[_2_] Excel Discussion (Misc queries) 3 July 27th 09 11:03 PM
copying sheets fastballfreddy Excel Discussion (Misc queries) 2 May 5th 06 07:20 AM
Copying from other sheets Vadiraj Excel Programming 1 January 29th 04 09:19 AM
Copying sheets Greg H. Excel Programming 6 January 19th 04 06:57 PM
Copying Sheets ianripping[_21_] Excel Programming 2 January 16th 04 12:28 PM


All times are GMT +1. The time now is 05:05 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"