VBA Macro Not Working Anymore

Hi All,

I need an urgent help on this topic.

I am using this code which I found in internet for looking up multiple instances lincked to a key and contatinate the same.

This was working fine earlier in my excel. Now its giving #VALUE error.

Please help!


Function Lookup_concat(Search_string As String, _
Search_in_col As Range, Return_val_col As Range)

Dim i As Long
Dim result As String

For i = 1 To Search_in_col.Count
If Search_in_col.Cells(i, 1) = Search_string Then
result = result & "/" & Return_val_col.Cells(i, 1).Value
End If
Next

Lookup_concat = Trim(result)

End Function

Regards
Kaushik

Hi there,

Without seeing your workbook it is impossible to be certain what is causing the error in your particular case, but a value of #VALUE!, #DIV/0! or #NA in the range specified by the "Search_in_col" argument will cause it.

Hope this helps.

Regards,

Greg M

1)
We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Rule #2 about code tags and adjust accordingly. Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

2) try change to

If cstr(Search_in_col.Cells(i, 1)) = Search_string Then

The issue was solved. It was a simple overlook of the fact that the source data had some value error. Corrected it. And the code worked fine.
Thanks for the response though.