Populate Cell If Any Duplicates Found - ALMOST THERE!!!

[sherwinarae]

The macro below highlights all duplicate value except for zero's, i need it to then populate cell H5 with "duplicates" IF any duplicates were found.
I tried the below but it doesn't work, HELP!!!!!



Dim dupindicator As Range
Set dupindicator = Range("H5")

'highlight duplicates
With Selection
.FormatConditions.Delete
.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
Formula1:="=0"
.FormatConditions(1).StopIfTrue = True
.FormatConditions.AddUniqueValues
.FormatConditions(2).DupeUnique = xlDuplicate
.FormatConditions(2).Interior.Color = RGB(255, 0, 0) And dupindicator.Value = "duplicates"
.FormatConditions(2).StopIfTrue = False

 

[Joe4]

Duplicate: http://www.mrexcel.com/forum/excel-questions/982242-ignore-zeroes-selection.html

Please do not post the same question multiple times. All clarifications, follow-ups, and bumps should be posted back to the original thread. Per forum rules, posts of a duplicate nature will be locked or deleted (rule #12 here: Forum Rules).