Why is formula not working when placed in Visual Basic?

[Amileaux]

Why does this work when placed in a cell on my worksheet:

=SUMPRODUCT((Database!WebDepYr="2004")*(Database!WebDepMonth="Jan")*(Database!Bucket = "Target")*(Database!FieldCount))


And I get a "Type Mismatch" when I use the same function in VBA? (Even when I change the data type to variant)

Dim intCurTarget as Integer (doesn't work even as Variant type)

intCurTarget = Application.WorksheetFunction.SumProduct(Range("Database!WebDepYr") = "2004") * (Range("Database!WebDepMonth") = "Jan") * (Range("Database!Bucket") = "Target") * (Range("Database!FieldCount"))

thank you. Marie

 

[Joe4]

Check out this link:

http://www.mrexcel.com/board2/viewtopic.php?t=68144