Macro to count unique values in a column, enter it in next column, then delete duplicates

**pmorisse** · 01-25-2013, 01:35 PM

I'm new to VBA programming, and would appreciate some help on this macro. I wrote the following code to sort a column containing ~6500 rows of user names, count how many times each one occurs, and write that count beside it. As a final step, I want to delete all duplicate rows within the worksheet so I'm left with unique user names, and the count of how many times each one occurred in the original data.

Please Login or Register  to view this content.

I'm thinking that another For Each-Next loop would accomplish my goal, but I'm unsure of how to proceed. Any ideas?

Thank you

**jraj1106** · 01-25-2013, 01:37 PM

Hi

Post a sample file

**AB33** · 01-25-2013, 02:57 PM

I do not know which columns are the duplicates in, but assuming that they are in column A, this will give you a good start

Please Login or Register  to view this content.

**pmorisse** · 01-25-2013, 03:21 PM

In my original post, I added an approximation of the file I'm working with.

**pmorisse** · 01-25-2013, 03:27 PM

Thanks AB33. After modifying the sheet name, this code did the job nicely. I'll be working with monthly data, so I'll modify your "With" statement to run on the active sheet.

Much appreciated.

Macro to count unique values in a column, enter it in next column, then delete duplicates

LinkBack

Thread Tools

Rate This Thread

Display

Macro to count unique values in a column, enter it in next column, then delete duplicates

Re: Macro to count unique values in a column, enter it in next column, then delete duplica

Re: Macro to count unique values in a column, enter it in next column, then delete duplica

Re: Macro to count unique values in a column, enter it in next column, then delete duplica

Re: Macro to count unique values in a column, enter it in next column, then delete duplica

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions