Remove Duplicate numbers

Excel Guru's;

I need help with a macro that will look for an item number duplicate and keep the top row of the duplicate but remove any other rows below it with the same number. I am not an expert with Macros and can really use some help from an expert. I attached a file and if you look at row 103 you will see an item number 1007:00527344 which is fine but you will also see the same number through row 108 which talks about QTY in the description only. I need the rows removed that are the same number below the first row with the number. In other words in this case I would want 103 kept and 104-108 removed. If there are any others with the same case then it would need to do the same thing.. In other words when there is a duplicate number I will only need the top # which is the actual number and description I can import.Thanks for the help experts. If you have questions let me know. The file is attached.

bzenker

Sub RemDup()
'
' RemDup Macro
'

'


I think this would do the trick...reply if anything more is required....
Range("D3").Select
Range(Selection, Selection.End(xlDown)).Select
Range("D3:G2477").Select
ActiveSheet.Range("$D$2:$G$2477").RemoveDuplicates Columns:=Array(1, 2, 3, 4), _
Header:=xlYes
Range("I9").Select
End Sub