duplicate data in range clear contents

B

baha17

Hi All,
I have a range which V12:V18, data consistantly changes and there
might be some duplications. I would like to find the duplicated data
and just clear the duplications without deleting any row. Because
those rows effecting other formulas.Is that possible?
Thanks
\\

Baha
 
P

p45cal

Hi All,
I have a range which V12:V18, data consistantly changes and there
might be some duplications. I would like to find the duplicated data
and just clear the duplications without deleting any row. Because
those rows effecting other formulas.Is that possible?
Thanks
\\

Baha
Sub blah()
Set Rng = Range("V12:V18")
For Each cll In Rng
If Application.WorksheetFunction.CountIf(Rng, cll.Value) > 1 The
cll.Value = Empty
Next cll
End Su
 
Top