Search Code vba return to the new sheet with duplicate data

[tantcu]

Hello,

I have a vba code to search and return data in the new sheet. However, if I search a specific word It will return double data since the item has two column has the same name.
For example: I have an item
Cust SKU Customer Desc Family Sub Family
811724 Walmart Can REFLECTIVE PAW CAT Cat C&L Cat C&L

So whenever I search the word Cat C&L it will result a duplicate value.


Is there a way that when I search something it only return unique Customer SKU that locate in column G. Please see my code below

Please Login or Register  to view this content.

[AB33]

Change this line
With ws.Range("A:CX")

INTO

Please Login or Register  to view this content.

But if we want one search only, you need to delete this line

Please Login or Register  to view this content.

[tehneXus]

Hi,

in the above code are searching for the string in "A:CX", you could first search for a specific column header and then only search for the string in that column, or you could leave the search loop after the first finding.

[tantcu]

The reason is I really want to search everything. Is there a code that can combine with this code but do the remove duplicate after the search is done?

[AB33]

As you are searching in entire column G, once the code finds the first match, it will go in to next match
which is this line, so if you want to the code to find the first match only, you do not need the code to go in to next search.
Set rFind = .FindNext(rFind)

[Norie]

Attach a sample workbook. Make sure there is just enough data to make it clear what is needed. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are demonstrated, mock them up manually if needed. Remember to desensitize the data.

Click on GO ADVANCED and use the paperclip icon to open the upload window.

View Pic