Finding a Duplicate using Vb

  • Thread starter Thread starter Rocky McKinley
  • Start date Start date
R

Rocky McKinley

Hi I'm trying to make a function which looks for duplicates using Vb.
Something
like...

'BigRange is always in worksheet "Main"
'Cell is always in worksheet "Print"
'something like below
Function DuplicateExists (BigRange as Range, Cell as Range) As Boolean
DuplicateExists = FalseIf cell exists in big Range and cell <> "" then
DuplicateExists = True
End if
End Function

I prefer not to pass "Cell" to a worksheet cell as I will be testing many
Cells with this function and it will bog down Excel. Is there a speedy way
to do this using Vb.

I apologize about the re-post however I'm looking for the fastest Vb
solution.
 
Function DuplicateExists (BigRange as Range, Cell as Range) As Boolean
if not isempty(cell) then
if application.countif(BigRange,Cell) > 0 then
DuplicateExists = True
End if
End if
End Function
 
Back
Top