Multiple Duplicate Rows to Single unique Row (Combine multiple duplicate rows to one)

signup

New Member
Joined
Feb 15, 2018
Messages
40
Office Version
  1. 2019
Platform
  1. Windows
Hi,

I have a sheet with the data like below, can some one help me with a formula or something else to get the expected output?

In my sheet i have a row with the same data multiple times, i need only one row with the same data and wanted to eliminate all duplicate rows and need same rule for all rows in my sheet. Can we do this by any formula or through VB Script?


Multiple Duplicate Rows to Single unique Row:
Firm Name
Firm AliasOffice AliasRep AliasTA CodeAddress 1Address 2CityStateZIP
Some Fund Company 1001002AAASome Address 1CITI 1STATE 1ZIP 1
Some Fund Company 1001002AAASome Address 1CITI 1STATE 1ZIP 1
Some Fund Company 1001002AAASome Address 1CITI 1STATE 1ZIP 1
Some Fund Company 2011022BBBSome Address 2CITI 2STATE 2ZIP 2
Some Fund Company 2011022BBBSome Address 2CITI 2STATE 2ZIP 2
Some Fund Company 2011022BBBSome Address 2CITI 2STATE 2ZIP 2
Some Fund Company 3111222CCCSome Address 3CITI 3STATE 3ZIP 3
Some Fund Company 3111222CCCSome Address 3CITI 3STATE 3ZIP 3
Some Fund Company 3111222CCCSome Address 3CITI 3STATE 3ZIP 3
Some Fund Company 4100333DDDSome Address 4CITI 4STATE 4ZIP 4
Some Fund Company 4100333DDDSome Address 4CITI 4STATE 4ZIP 4
Some Fund Company 4100333DDDSome Address 4CITI 4STATE 4ZIP 4
Expected Output:
Firm Name
Firm AliasOffice AliasRep AliasTA CodeAddress 1Address 2CityStateZIP
Some Fund Company 1001002AAASome Address 1CITI 1STATE 1ZIP 1
Some Fund Company 2011022BBBSome Address 2CITI 2STATE 2ZIP 2
Some Fund Company 3111222CCCSome Address 3CITI 3STATE 3ZIP 3
Some Fund Company 4100333DDDSome Address 4CITI 4STATE 4ZIP 4

<tbody>
</tbody>
 

Excel Facts

Create a Pivot Table on a Map
If your data has zip codes, postal codes, or city names, select the data and use Insert, 3D Map. (Found to right of chart icons).
Try:
Code:
Sub RemoveDups()
    Cells.RemoveDuplicates Columns:=Array(1), Header:=xlYes
End Sub
 
Upvote 0
Try:
Code:
Sub RemoveDups()
    Cells.RemoveDuplicates Columns:=Array(1), Header:=xlYes
End Sub


Thank You for the reply, I'm getting 400 error while running above code. Don't we have any formula for this?
 
Last edited:
Upvote 0
I tried the macro on the data you posted and it worked properly. Are you trying the macro on the same data?
 
Upvote 0
I tried the macro on the data you posted and it worked properly. Are you trying the macro on the same data?

Yes @mumps I'm trying macro on same data..

I selected data and tried to run the macro but i'm getting error. should i do it in any specific way?
 
Upvote 0
Click here to download your file. Run the macro in Module1.
 
Upvote 0

Forum statistics

Threads
1,215,046
Messages
6,122,849
Members
449,096
Latest member
Erald

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top