Below is an excert of code:

Dim rng As Range
Dim rng2 As Range
Dim tarrng As Range

Set rng = ActiveCell
Set rng2 = ActiveCell.End(xlDown)
Set tarrng = Range(rng, rng2)

tarrng.Select


BufYes.Value = WSDSD.Evaluate("=SUMPRODUCT((tarrng=" & ProVa &
")*(tarrng<0)")


BufYes is returning a #value error. Variations of this code works. I know
the current problem rests in the tarrng variable but I am not sure why. ???
--
Thanks
Shawn