On Jul 14, 6:34*am, webels wrote:
Hi
I am hoping someone might have a VBA solution for this

I have the following list in excel
12345 * 14/07/2009
12345 * 15/07/2009
12345 * 28/07/2009
35687 * 17/07/2009
35687 * 18/07/2009
35687 * 19/07/2009
23658 * 20/07/2009
23658 * 21/07/2009

The first Column is Col A and the second i Col B. I would like to
remove duplicates from Column A to be left with the following

12345 * 14/07/2009
* * * * 15/07/2009
* * * * 28/07/2009
35687 * 17/07/2009
* * * * 18/07/2009
* * * * 19/07/2009
23658 * 20/07/2009
* * * * 21/07/2009

Thereby keeping the first incidence of the number. Column B is not
always dates it may sometimes be Surnames.

I would be grateful for any help on this.

Eddie

Option Explicit
Sub duplicatesdelete()
Dim i As Long
For i = Cells(Rows.Count, "a").End(xlUp).Row To 2 Step -1
If Cells(i, "a") = Cells(i - 1, "a") Then Cells(i, "a") = ""
Next i
End Sub