remove duplicated from only data validation

[abdelfattah]

hello
I search so much in the internet how I can remove duplicated names from data validation as in my code data validation is g1
indeed I 'v found some solution but not perfect I have to filter the column f to remove duplicated but I need it I don't remove duplicated from column f b I would do that directly from data validation I no know if data validation Properties contains that
this is my code

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns(6)) Is Nothing Then
Dim Rng As Range
Set Rng = Range(Range("f1"), Range("f" & Rows.Count).End(xlUp))
With Range("g1").Validation
    .Delete
    .Add Type:=xlValidateList, Formula1:="=" & Rng.Address & ""
End With
End If
End Sub

 

[Peter_SSs]

doesn't change any thing

One possibility is that your events have become disabled. Close right out of excel then open it up again.
Remove all existing Data validation from columns I:K and then change or re-enter a value in columns F:H somewhere.

 

[abdelfattah]

thanks very much for your solution and assistance

 

[Peter_SSs]

thanks very much for your solution and assistance

Cheers. Glad to help.