Macro to merge duplicate rows unique values - current macro not working

[aimeecrystalaid]

Hello,

Am trying to find a macro that works to merge duplicate rows unique values. I currently am using the below macro which appears to work on test sheets, it merges the unique values in column B and separates them by a comma and a space (which i need) but it removes column C if there is any data in column C and when used on larger spreadsheets it deletes around 4 random unique values.

Example sheet
Macro Example.xlsx

What i really need is a macro that will do the following:
- Find all duplicate rows
- Merge unique values in those duplicate rows and place in column B with each value separated by ", " (comma and a space)
- Delete all duplicates (only keeping the one with all values in column B)
- KEEP the following columns of data. column B is the ONLY column that contains unique values in the sheet, the following columns will be the exact same information for every duplicate. the macro i am currently using doesn't delete them or anything, it just mixes them up all over the joint so i get descriptions for things in the wrong place (eg. in example sheet, "banana description" will appear in the "Apple" row)

This is the current macro I am using:

Please Login or Register  to view this content.

[stanleydgromjr]

aimeecrystalaid,

Thanks for the workbook.

With your raw data in worksheet Sheet1, the results will be written to worksheet Sheet2 (per your workbook).

Please TEST this FIRST in a COPY of your workbook (always make a backup copy before trying new code, you never know what you might lose).

Please Login or Register  to view this content.

Before you use the macro with Excel 2007 or newer, save your workbook, Save As, a macro enabled workbook with the file extension .xlsm

Then run the ReorgData macro.

[aimeecrystalaid]

Perfect! thanks heaps

[stanleydgromjr]

aimeecrystalaid,

Thanks for the feedback.

You are very welcome. Glad I could help.

And, come back anytime.

[Shaalokim]

Hello stanleydgromjr

I'm new to VBA and been going through your macro for like 5 hours now without beying able to expand its magic into next columns.
How do I apply it for collumns c, d etc.? I guess its a matter of selecting the right range but wasn't able to do this.

Can u help me pls?

[stanleydgromjr]

Shaalokim,

I just received your Private Message.

I would think that you should start your own New Thread, with:
1. an appropriate/descriptive title
2. what version of Excel and Windows you are using?
3a. attach a workbook with the raw data on one worksheet
3b. and, on another worksheet (manually formatted by you) the results you are looking for

To attach your workbook, scroll down and click on the Go Advanced button, then scroll down and click on the Manage Attachments button.

4. Then send me a Private Message with a link to this thread, and, with a link to your New Thread, and, I will have a look.

Please Login or Register  to view this content.