Macro Error, can't locate problem

[group-am]

New Here and I need some help.

I had a friend create a program and it has worked perfectly for a while. Now I am having issues with it and can't get in contact with him. The program looks a values in Column A, and if find finds the value in Column B and combines them into a cell with a delimiter of ";" (semicolon). I have a set of data that it will not do this for, it keeps giving me a Runtime Error '13', type mismatch.


As I said this is over my head, here is the code that he created. The line in bold is where the debug says the issue is. I have searched and searched and can't find the problem.

_____________________________________________________________________________________

Please Login or Register  to view this content.

_____________________________________________________________________________________

Attached is the list I am working with.


Please any help is appreciated.

[Arkadi]

Not sure of the solution yet... I think the problem is the length of the contents in column B are so long, the code is fine on its own

[AB33]

Group-am,
Please wrap your code in tags as per forum's rule
Hi Arkadi
It might be the transpose has a limit on the length of characters.
Try a different solution.

[group-am]

Group-am,
Please wrap your code in tags as per forum's rule
Hi Arkadi
It might be the transpose has a limit on the length of characters.
Try a different solution.

Sorry about that, I updated the post and wrapped the code.

Thank you.

[Arkadi]

AB33 good idea, manually transposing data works, and I watched items get added when I step through his macro... yet the ubound of the items is 0? I'm a bit stumped on this one so far, but then I never use dictionaries (i should).

[JBeaucaire]

Closed at OP's request.