Find exact values
Hey guys
8642883054
0
8645695369
0
0
8039998989
Above is some sample data I am working with.
Below is the code that references the above sample data.
In this below code the variable "ItemValue" will represent
each of the sample data individually:
Do Until SPSave = EPSave
FndOccurances = Worksheets("SMSRD").Range("K" &
SPSave).Find(ItemValue)
If FndOccurances < Empty Then
AddFnd = AddFnd + 1
Else
End If
Loop
Lets say ItemValue = 0. My code should be returning 3 but
instead its returning 5. Its returning this because its
looking for 0 in all the values. Since 5 of the values in
the sample data contains 0s in the value, it returns 5. I
only want it to look at exact values. If it did this it
would return 3 like I need.
How do I make it look for only exact values using the code
I have supplied?
Thank you
Todd Huttenstine
|