How to remove all duplicates but keep only one in Excel?
This tutorial introduces the tricks to remove all duplicate values from a list but keep only one in Excel, read the details:
Remove all duplicates but keep only one with Remove Duplicates function
Remove all duplicates but keep only one with VBA
Remove all duplicates but keep only one with Kutools for Excel 
Combine all duplicate rows and keep data with Kutools for Excel
Remove all duplicates but keep only one with Remove Duplicates function
In Excel, the Remove Duplicate feature can help you remove all but keep one duplicate value.
1. Select the data list you need, and click Data > Remove Duplicates. See screenshot:
2. Then in Remove Duplicates dialog, check the column name that you want to remove duplicates from, and if your data has header, check My data has headers option, too. See screenshot:
3. Click OK. And a dialog pops out to tell you how many duplicates have been removed, just close it. And now all duplicates have been remove but keep only one in the list.
Remove all duplicates but keep only one with VBA
If you are interested in VBA, here I also can introduce a VBA code to solve this task.
1. Press Alt +F11 keys simultaneously to open Microsoft Visual Basic for Applications window.
2. Click Insert > Module, and paste below VBA to the new Module window.
VBA: Remove all duplicates but keep one.
Sub RemoveAllDeplicateButOne()
Dim LR As Long: LR = Range("A" & Rows.Count).End(xlUp).Row
ActiveSheet.Range("A1:A" & LR).RemoveDuplicates Columns:=1, Header:=Name
End Sub
3. Press F5 key or click Run to execute the VBA, and the duplicates in list in column A have been removed but keep one.
Tip: In the above VBA, A indicates the column A, and A1: A indicates the list range, you can change them as you need.
Remove all duplicates but keep only one with Kutools for Excel
There is a powerful utility in Kutools for Excel named Select Duplicate & Unique Cells can quickly select or highlight all duplicates except first one, and then you can remove them.
| Kutools for Excel, with more than 300 handy functions, makes your jobs more easier. | ||
After free installing Kutools for Excel, please do as below:
1. Select the data range and click Kutools > Select > Select Duplicate & Unique Cells. See screenshot:
2. In the displayed dialog, check Duplicates (Except 1st one) option, and click Ok. See screenshot:
3. Then a dialog pops out to remind you the number of selected cells. And just click OK to close it. See screenshot:
4. And all the duplicates but first one are selected, press Delete key to clear them.
Tip: You also can remove all duplicates but keep one with Select Duplicate & Unique Cells like this:
Select all the unique values including the first duplicates, and then copy them by pressing Ctrl + C and paste to another location by Ctrl + V.
Remove All Duplicates But Keep Only One
Combine all duplicate rows and keep data with Kutools for Excel
If you have some data, and what you want is to combine the duplicate rows then keep the corresponding data as below screenshot shown, you can use Kutools for Excel’s Advanced Combine Rows function.
After free installing Kutools for Excel, please do as below:
1. Select the data and click Kutools > Merge & Split > Advanced Combine Rows. See screenshot:
2. In the Combine Rows Based on Column dialog, select the column you want to remove duplicate from and click Primary Key to make it as the primary key column. See screenshot:
3. Then select the column you just want to keep the data and then click Combine, and select one delimiter form the list. See screenshot:
4. Click Ok, and the duplicate rows are combine and keep the corresponding data.
Combine Duplicates But Keep Adjacent Data
Relative Articles:
- How to combine multiple cells with leading zeros into a cell in Excel?
- How to generate random number without duplicates in Excel?
Best Office Productivity Tools
Supercharge Your Excel Skills with Kutools for Excel, and Experience Efficiency Like Never Before. Kutools for Excel Offers Over 300 Advanced Features to Boost Productivity and Save Time. Click Here to Get The Feature You Need The Most...
Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier
- Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
- Open and create multiple documents in new tabs of the same window, rather than in new windows.
- Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
