Check if named range exists and ignore if it doesn't

**lawtonl** · 10-13-2009, 10:27 AM

Hello there

I'm struggling to pull this one together.

I'm trying to program a macro that checks to see if a named range exists and copy and paste the data if it does and ignore it if it doesn't or just ignore the error message would be good enough.

Here's the code I'm using:

Please Login or Register  to view this content.

I keep getting a 1004 error whatever code I put in, any ideas?

tia

**royUK** · 10-13-2009, 10:42 AM

This Function checks if a name exists

Please Login or Register  to view this content.

**shg** · 10-13-2009, 10:45 AM

I doubt this is correct, since I can't tell where the ranges are supposed to exist, but maybe you'll get the drift.

Please Login or Register  to view this content.

**lawtonl** · 10-13-2009, 11:32 AM

Thanks guys.

Shg the ranges exist in each workbook a1 for title and b1 for accnum in the Suspects Import Template - test.xlsm workbook and it's a1:a20000 and b1:b20000 in the GB August.csv file. In both workbooks the named ranges are First and AccNum. Cause this will be an ongoing job I'll have to change the range in the csv file to copy from hence why I'm using ranges in the code rather than cell references.

Using your code(cause I'm a VBA newbie) I get a 438 error on the following lines:

Please Login or Register  to view this content.

**royUK** · 10-13-2009, 11:58 AM

Use the Function that I posted to check if the name exists

Please Login or Register  to view this content.

**lawtonl** · 10-14-2009, 05:29 AM

Royuk, thanks. I tried the code you suggested and using the following code I still get the same error, Error 1004 at the same place:

Please Login or Register  to view this content.

Could it be my code? I'm not very experianced with VBA to be honest.

tia

**royUK** · 10-14-2009, 07:19 AM

I can't check this but maybe

Please Login or Register  to view this content.

**lawtonl** · 10-14-2009, 10:05 AM

Argh!

Right I managed to get the code working, although it's a bit of a botched job I must admit using the following code. As I added more code along the same line it hits those If statements and grinds to a halt again with Error 1004

Please Login or Register  to view this content.

The line of code that checks for the named range "email" is the same as AccNum, in the fact that there is no data in the workbook at present to be copied yet it bypassed the AccNum If statement, as I want it to if there is no range there and went to the next at when it got to the email If statement and it came up with Error 1004.