Okay. So, if I put =SumProduct(etc) into a cell in a blank worksheet
and set the rest of it up as shown it works exactly as expected.
However, on that same worksheet if I put the code into a macro and
execute it I invariably get a "Type Mismatch" error at cnt= . I even
deleted the formula from the cell to make sure it wasn't interfering
somehow. While typing the code I found that there was a " missing from
before the & in front of rng1. When I put it in, VB accepted the line
of code but it still generates the error. What am I missing?

Bill