Combine 2 Rows then remove duplicates

[Freeman2022]

Hello,

I have 2 columns with customer numbers, some of the columns have the same account number, I would like to combine the columns then remove all duplicates.

 

[Fluff]

Glad we could help & thanks for the feedback.

 

[Freeman2022]

OK, wasn't sure if this was just a "one-time" thing or not.
You just got some good VBA and non-VBA solutions (see Fluff's solution).

Thank you so much for the VBA code, that also works.

 

[Joe4]

Thank you so much for the VBA code, that also works.

Wasn't my solution. pjoaquin provided the VBA solution.

 

[Freeman2022]

Wasn't my solution. pjoaquin provided the VBA solution.

Yes it was, sorry about that

 

[Freeman2022]

This code should work

Sub freeman()
Dim lastrowa As Long, lastrowb As Long
lastrowa = Range("A" & Rows.Count).End(xlUp).Row
lastrowb = Range("B" & Rows.Count).End(xlUp).Row
Range("A" & lastrowa + 1).Resize(lastrowb - 1, 1).Value = Range("B2:B" & lastrowb).Value
Range("A1:A" & lastrowa + lastrowb - 1).RemoveDuplicates Columns:=1, Header:=xlYes
End Sub

Thank you for the VBA code, that also works.