duplicate data in range clear contents

[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

 

[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

 

[baha17]

Thank you very much, it works for me very well.
Have a good day
Baha