Thread: delete rows by looking at the next column if they are equal
View Single Post
 
Old 03-25-2018, 04:13 AM
p45cal's Avatar
p45cal p45cal is offline Windows 10 Office 2010 32bit
Expert
  
Join Date: Apr 2014
Posts: 947
p45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond repute
Default
Code:
Sub Macro1()
    ActiveSheet.Range("A1").CurrentRegion.Columns("A:F").RemoveDuplicates Columns:=2, Header:=xlYes
End Sub
Although it's just as easy to use Remove Duplicates in the Data Tools section of the Data tab of the ribbon.
Reply With Quote