Run time error - type mismatch

**justinng** · 08-06-2009, 05:27 AM

Hi

Can anyone help to solve my problem? I have attached a sample file for you to easy reference. So when the code run until the loop function, it will prompt an error message.

The idea is to open the selected file and the copy the data from the selected to this master file by searching the column A. Column A has the identical text in all the files that are to be copied from.

Thank you

Regards,
Justin

**Phil_V** · 08-06-2009, 06:06 AM

Which line is highlighted when the code errors?

I'm presuming that the file you uploaded is just an example file, as none of the sheets have the names that the macro expects?

**justinng** · 08-06-2009, 08:49 PM

Hi Phil,

Thanks for replying. Yes, it is an example file. The error appeared when the code run into

For Each rngCell In rngDataR
Set rngFound = wsOpenR.Columns(1).Find(what:=CLng(wsDataR.Cells(rngCell.Row, 1).Value))

Thank you very much for your help.

Best Regards,
Justin

**Phil_V** · 08-07-2009, 03:52 AM

What Error message did you get?

Your code is written specifically to present an error message if there are ANY problems.

I would guess that either rngDataR has ended up not being set to anything, or that on that line of code the what was not found in wsOpenR.Columns(1).

The error message would be useful to know though.

**romperstomper** · 08-07-2009, 03:58 AM

I'd guess the CLng is failing here:

Please Login or Register  to view this content.

What value is in the cell when the code fails?

**justinng** · 08-07-2009, 05:35 AM

Hi,

I have an error number #13.

The field that they are trying to search is a text. like "ABC", "CBA" as indicate in my test file. I need the code to search, match the column with the same text and return the value under the respective company.

Thanks
Justin

**romperstomper** · 08-07-2009, 05:45 AM

You can't convert "ABC" to a long integer so you need to remove the CLng function:

Please Login or Register  to view this content.

**justinng** · 08-10-2009, 11:24 PM

Dear Romperstomper,

Thank you very much for the help, it has been a great help to me. It is working now.

Justin

Run time error - type mismatch

LinkBack

Thread Tools

Rate This Thread

Display

Run time error - type mismatch

Re: Run time error - type mismatch

Re: Run time error - type mismatch

Re: Run time error - type mismatch

Re: Run time error - type mismatch

Re: Run time error - type mismatch

Re: Run time error - type mismatch

Re: Run time error - type mismatch

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions