UDF To Check Cell is having validation or not:
Function is_validation(rng As Range) As Boolean
Dim i
On Error Resume Next
i = rng.Validation.Type
On Error GoTo 0
If i = 3 Then
is_validation = True
Else
is_validation = False
End If
End Function
Use it like =is_validation(D3)
Function is_validation(rng As Range) As Boolean
Dim i
On Error Resume Next
i = rng.Validation.Type
On Error GoTo 0
If i = 3 Then
is_validation = True
Else
is_validation = False
End If
End Function
Use it like =is_validation(D3)